Регистрация
ambarik
24.06.2021 15:29
Информатика
Есть ответ 👍

Детектер форматына не жатады​

253
311
Посмотреть ответы 1

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

реа200
реа200
4,6(67 оценок)
Program maxx; var max,n,k,i: integer; begin writeln('введите кол-во чисел'); readln(k); max: =0; for i: =1 to k do begin readln(n); if n> max then max: =n; end; writeln(max); end.

Популярно: Информатика