Программа с простейшим меню

Начать выполнять лаб. работу путём переделки предыдущей программы: 1) переделка ВСЕГО ПРЕДЫДУЩЕГО текста программы в набор из нескольких Procedure(...) и Fuction(...) в разделе процедур и функций; 2) написание нового (короткого) текста ОСНОВНОЙ программы ( = раздел операторов между BEGIN и END. ), содержащего простейшее МЕНЮ [внешний цикл типа repeat ... untul k=0; внутри цикла: А) вывод (writeln) подсказок-пунктов меню типа 1. Ввод данных 2. Обработка данных ... 4. Просмотр матрицы ... 0. Выход из программы ; Б) подсказка "Введите номер пункта меню: " и ввод значения управляющей переменной (например, k ) ; В) оператор CASE k of ... для вызова внутри него (по имени) нужной процедуры (функции) ].