Byuguzne
6 год назад
Дан массив А(7). Найти максимальный элемент массива.
ОТВЕТЫ
Karl
Jul 5, 2019
Program ar;
var arr:array[1..7] of integer;
i,h:integer;
begin
h:=0;
for i:=1 to 7 do
begin
readln(arr[i]);
if arr[i] gt; h then h:=arr[i];
end;
write(h);
end.
var arr:array[1..7] of integer;
i,h:integer;
begin
h:=0;
for i:=1 to 7 do
begin
readln(arr[i]);
if arr[i] gt; h then h:=arr[i];
end;
write(h);
end.
147
