Question

Массив из 10 элементов заполнить случайными числами от -10 до 10 и вывести на экран сумму элементов.

Pascal

Answer 1

Программа:

Pascal:

var arr: array[1..10] of integer;

begin

 for var i := 1 to 10 do arr[i] := random(-10, 10);

 writeln(arr, #10, 'Сумма элементов массива: ', arr.sum);

end.