Помогите пожаалуйста с информатикой. Решение задачи нужно написать ** языке...

0 голосов
48 просмотров

Помогите пожаалуйста с информатикой. Решение задачи нужно написать на языке программирования Turbo Pascal. ( решить в паскале)

С клавиатуры вводится n чисел. Найти максимальные.


Информатика (76 баллов) | 48 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Сам пременные объявишь

begin

 read(max);

 read(min);

 while(n <> 0) do // пока не равну нолю делать то то. ноль - знак окончание ввода чисел

  if max < min then min := max;

 writeln(max);

end.

(151 баллов)