Впаскаль абс. в эвм поступают результаты соревнований по плаванию для трех спортсменов. составьте программу, которая выбирает лучшей результат и выводит его на экран с сообщением, что это лучшей результат.

141

287

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

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

Svetik200611

Информатика

4,6(72 оценок)

const n = 3;

var a: array[1..n] of integer; i, max: integer;

begin max : = 0; writeln('введите результаты трех спортсменов'); for i : = 1 to n do readln(a[i]); for i : = 1 to n do begin if a[i] > max then max : = a[i]; end; writeln; writeln('лучший результат среди трех спортсменов - ', max); end.