Всоревнованиях по прыжкам в длину участвуют 25 спортсменов, с клавиаиуры ввести номер спортсмена и его результат ( номер спортсмена не связан с очередностью). написать программу, которая выводит на экран номер и результат худшего и лучшего спортсменов. все это как то связанно с оператором повтора for

208

459

Посмотреть ответы 2

Ответы на вопрос:

LiliLaind

Информатика

4,7(43 оценок)

Var a,b: array[1..25] of integer; i,min,max: integer; begin max: =1; min: =1; for i: =1 to 25 do begin read(a[i]); read(b[i]); if a[i]> a[max] then max: =i; if a[i]< a[min] then min: =i; end; writeln('лучший - ',a[max],' длина - ',b[max]); writeln('худший - ',a[min],' длина - ',b[min]); end.