Регистрация
manyna4
13.07.2022 03:10
Информатика
Есть ответ 👍

(цена(1 кг)>160)и(число>=20)

269
464
Посмотреть ответы 1

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

АнастасияCat144
АнастасияCat144
4,5(62 оценок)

var i,max:integer; a:Array[1..10] of integer = (5,4,9,8,4,8,2,3,8,7);

begin

   max := a[1];

   for i:=2 to 10 do begin

       if max < a[i] then max := a[i];

   end;

   write('Максимальный элемент массива равен ', max);

end.

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