Question

Заполнить массив из 15 элементов значениями из диапазона (-10;10)

Answer 1

Begin
for var x :=-10 to 4 do
Writeln (x);
end.