Question

Створити список з 10 випадкових елементів (від -10 до 10) і надрукувати його

Answer 1

var

 a:array[0..9]of integer;

begin

 Randomize;

 for var i := 0 to 9 do a[i] := random(21)-10;

 for var i := 0 to 9 do write(a[i]+', ');

end.