Заполните массив случайными целыми числами из отрезка [0,10]

Question

Информатика

Феона

4 мая, 06:58

Заполните массив случайными целыми числами из отрезка [0,10]

+2

Ответы (1)

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

Миша · Answer 1

Const n = 10;

var x: array[1 ... n] of integer;

i: integer;

begin

Randomize;

for i : = 1 to n do

begin

x[i] : = Random (11);

Write (x[i]:4)

end;

end.