Заполнить массив из 15 элементов случайным образом. Вещественными значениями x (22 больше или равно х < 23).

Question

Мироха

22 августа, 02:45

+4

Ответы (1)

Знаете ответ на вопрос?

Димаха · Answer 1

Const N=15;

var A:array[1 ... N] of real;

i:integer;

begin

for i:=1 to N do begin

A[i]:=random (22,100) ;

write (A[i],' ') ;

end;

end.