Программа ** паскаль 9) Вводится произвольная последовательность целых чисел. Найти сумму...

Question

Программа на паскаль
9) Вводится произвольная последовательность целых чисел. Найти сумму чисел больших наперед заданного числа x

Answer 1

//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

 var mas:=ReadlnString('Вводите').ToIntegers;

 var x:=readinteger('x=');

 Writeln('Сумма=',mas.Where(t->t>x).Sum);

end.

---