ДАЮ 55 БАЛОВ Задайте массив с помощью рандома 70 ** отрезке -35 - 35 Найдите в нем...

Question

ДАЮ 55 БАЛОВ Задайте массив с помощью рандома 70 на отрезке -35 - 35 Найдите в нем максимальный элемент и его число

Comments

На каком языке?

---

Паскаль, с++, c#, java? Я про это

Answer 1

const n=10;

var

x: array [1..n] of integer;

kmax,k, smax : integer;

begin

randomize;

smax:=-99;

for k:=1 to n do

begin

x[k]:=random(70)-35;

write(x[k],' ');

if x[k]>smax then

begin

smax:= x[k];

kmax:=k;

end;

end;

writeln();

writeln(smax);

writeln(kmax);

end.