Дан массив А (7). Найти максимальный элемент массива.

Question

Информатика

Деня

28 июня, 15:25

Дан массив А (7). Найти максимальный элемент массива.

+1

Ответы (1)

Знаете ответ?

Евдения · Answer 1

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] > h then h:=arr[i];

end;

write (h) ;

end.