Условие задачи
Курс доллара в течение года менялся в диапазоне от 63 руб. до 70руб. Найти наибольшее значение курса доллара. В качестве результата вывести номер месяца и значение курса доллара.
Ответ
Листинг программы:
program pascal3;
var arr:array[1..12] of integer;
max,q,maxq:integer;
begin
for q:=1 to 12 do
arr[q]:=random(63, 70);
max:=arr[1];
for q:=2 t...