Регистрация
sdfdsgdfh
30.05.2022 07:05
Информатика
Есть ответ 👍

Выражение:
с объяснениями! я не понимаю!

139
222
Посмотреть ответы 1

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

dmitriybatulin
dmitriybatulin
4,7(11 оценок)
Program gt; var a,i,n,max: longint; begin read(n); max: =0; for i: =1 to n do begin read(a); if(a> max)then max: =a; end;   if(max=0)then writeln('положительных чисел нет')else writeln(max); end.

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