Написать программу которая формирует случайным образом массив из 20 целых чисел л?
Написать программу которая формирует случайным образом массив из 20 целых чисел л??жащих в диапазоне от 0 до 1000 после чего на экран выводится сам массив в одну строку следующей строке номер максимального элемента пробел максимальный элемент
Ответ(ы) на вопрос:
Так уже решал такую задачу:
const n=20;
var
a:array[1..n] of integer;
i,max,nmax:integer;
begin
max:=0;
for i:=1 to n do begin
a[i]:=random(1001);
if a[i] >max then begin
nmax:=i;
max:=a[i];
end;
write(a[i]:5);
end;
writeln;
writeln(nmax,,a[nmax]);
end.
Не нашли ответ?
Похожие вопросы