Исправление bormant, (текущая версия) :
препод скажет «мы ещё не прошли процедуры и функции, переделывай»
А ТС сказал — не написать за меня а помочь разобраться. Вот разберется и напишет как надо. Или не разберется, кто ж его знает.
PS. Из структурированного кода сделать монолитный обычно проще, чем наоборот ;)
Исходная версия bormant, :
препод скажет «мы ещё не прошли процедуры и функции, переделывай»
А ТС сказал — не написать за меня а помочь разобраться. Вот разберется и напишет как надо. Или не разберется, кто ж его знает.