Дан массив А(10), заполненный датчиком случайных чисел. Найти наибольший элемент.
Прошу помогите!
Ответы
Ответ дал:
0
const
n=10;
var
a: array[1..n] of real;
s: real;
i: integer;
begin
Randomize; // инициализация датчика случайных чисел
s:=-1000; // датчик выдает только неотрицательные значения
for i=1 to n do a[i]:=random(100);
for i:=1 to n do
if a[i]>s then a[i]:=s;
writeln('максимум =',s)
end.
n=10;
var
a: array[1..n] of real;
s: real;
i: integer;
begin
Randomize; // инициализация датчика случайных чисел
s:=-1000; // датчик выдает только неотрицательные значения
for i=1 to n do a[i]:=random(100);
for i:=1 to n do
if a[i]>s then a[i]:=s;
writeln('максимум =',s)
end.
Ответ дал:
0
Благодарю.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад