Дан массив H размером 3*2 составить программу нахождения максимального элемента помогите...

0 голосов
31 просмотров

Дан массив H размером 3*2 составить программу нахождения максимального элемента помогите плиз


Информатика (150 баллов) | 31 просмотров
Дан 1 ответ
0 голосов

Program z1;
var
n: array[1..10,1..10] of integer;
i,j,max: integer;
begin
max:=-1000;
writeln('Введите элементы массива');
for i:=1 to 3 do
for j:=1 to 2 do
begin
write('n[',i,',',j,']=');
readln(n[i,j]);
if n[i,j]>max then
max:=n[i,j];
end;
writeln('Максимальный элемент равен ',max);
end.

(4.7k баллов)