Написать программу которая формирует случайным образом массив из 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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы