Найти максимальный элемент этого массива
const n=20;
var a: array[1..n] of integer;
i,max: integer;
begin
randomize;
for i:=1 to n do
a[i]:= random(90)+10;
for i:=1 to n do
write(a[i]:4);
writeln;
for i:= to n do
if a[i] then max:= ;
writeln('max: ', );
end.
Ответы на вопрос
Ответил NeznaikaNaLune2017
0
Вероятно имеется в виду, что некоторые строки нужно исправить.
в третьей строке я добавил бы спереди слово var:
var i,max: integer;
а хвост программы подправил бы так:
writeln;
max := a[1] ;
for i:= 2 to n do
if a[i] > max then max:= a[i] ;
writeln('max: ', max );
end.
жирным выделены добавки к исходному тексту.
в третьей строке я добавил бы спереди слово var:
var i,max: integer;
а хвост программы подправил бы так:
writeln;
max := a[1] ;
for i:= 2 to n do
if a[i] > max then max:= a[i] ;
writeln('max: ', max );
end.
жирным выделены добавки к исходному тексту.
Ответил kulabuhov98
0
Решение данной задачи прикреплено ниже.
Приложения:
Новые вопросы