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

Question

Эсфирка

28 апреля, 02:58

+1

Ответы (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.