program trans_matric;
procedure Pro_38();
Var { Блок объявления переменных }
X, Y : Array [1..20, 1..20] Of Integer;
... итд.
... остальные
... операторы с того сайта
end;
{ основная прога }
Pro_38();
end.
задача в турбо паскале
Задача такова: написать программу транспортирования матрицы , в основой программе должны содержаться вызовы только процедур.
Заранее наиогромнейшее спасибо!!!!!!!!!!!!!!!!!!!
Если что не так написала - извините!..
И напр. на http://borlpasc.narod.ru/docym/le/pract/matrix/9.htm готоувая прога, с комментариями.
Нужно только изменить первую строку (program на procedure и убрать аргументы) и последнюю (точку заменить на точку с запятой. И напр.
Код:
Спасибо большое, за помощь!!!!!
:)