Предмет: Информатика,
автор: ASDWWWSAAS
Известна масса 12 предметов определить массу самого большого. Паскаль
Ответы
Автор ответа:
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.
begin
for i:=1 to 12 do
begin;
read(A[i]);
if A[i]>max then max:=A[i];
end;
Writeln(max);
end.
Похожие вопросы
Предмет: Окружающий мир,
автор: yrikg3572
Предмет: Математика,
автор: k9897352
Предмет: История,
автор: 5nyvwxbff5
Предмет: Биология,
автор: nastyarut
Предмет: Математика,
автор: elll2002