Заполнить массив A (21) случайными числами в диапазоне от - 1 до 17. Выведите его на экран. Pascal abc 9 класс

Question

Информатика

Игорич

29 октября, 23:38

Заполнить массив A (21) случайными числами в диапазоне от - 1 до 17. Выведите его на экран. Pascal abc 9 класс

+2

Ответы (1)

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

Денуся · Answer 1

Const

n=21;

var a:array[1 ... n] of real;

i:integer;

begin

randomize;

for i:=1 to n do begin

a[i]:=random (18) + - 1;

write (a[i],' ') ;

end;

end.