Дан одномерный массив размером 25, диапозон значений заданный рандомом и равен 250, найти минимальное занчение для нечетных индексов, максимальное для четных

Question

Информатика

Анатолий

15 мая, 16:11

Дан одномерный массив размером 25, диапозон значений заданный рандомом и равен 250, найти минимальное занчение для нечетных индексов, максимальное для четных

+2

Ответы (1)

Знаете ответ?

Валяха · Answer 1

Program test;

const n = 25;

var i, min, max:integer;

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

begin

randomize;

min:=251;

max:=-1;

for i:=1 to n do

m[i]:=random (250) ;

for i:=1 to n do

if i mod 2 = 0

then if m[i]
else if m[i]>max then max:=m[i];

writeln (min) ;

writeln (max) ;

end.