Ввести с клавиатуры массив с из 10 элементов,найти наибольший элемент массива.

yaach1 yaach1    2   05.10.2019 12:30    1

Ответы
mamka18 mamka18  09.10.2020 21:38

var

i, max:integer;

c: array[1..10] of integer;

begin

for i:=1 to 10 do

read(c[i]);

max:=c[1];

for i:=2 to 10 do

if (c[i]>max) then max:=c[i];

write(max);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика