Предмет: Информатика, автор: ASDWWWSAAS

Известна масса 12 предметов определить массу самого большого. Паскаль

Ответы

Автор ответа: Кот49
2
var A : array[1..12] of integer; i,max : integer;
begin
for i:=1 to 12 do
begin;
read(A[i]);
if A[i]>max then max:=A[i];
end;
Writeln(max);
end.
Похожие вопросы
Предмет: Математика, автор: k9897352