Question

написать программу сумирующую n первых элементов из 10 элементов массива введенных случайным образом (pascal)

Answer 1

===== PascalABC.NET =====

begin

 var a := ArrRandom(10, -99, 99);

 a.Println;

 var n := ReadInteger('Сколько элементов суммировать?');

 a?[:n].Sum.Println

end.