Предмет: Информатика,
автор: nurr322
Программа на паскаль
9) Вводится произвольная последовательность целых чисел. Найти сумму чисел больших наперед заданного числа x
Ответы
Автор ответа:
0
//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.
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ReadlnString('Вводите').ToIntegers;
var x:=readinteger('x=');
Writeln('Сумма=',mas.Where(t->t>x).Sum);
end.
Приложения:
Похожие вопросы
Предмет: Обществознание,
автор: owisnzaqpm
Предмет: Английский язык,
автор: mixalei2345
Предмет: Геометрия,
автор: milkiiikssha
Предмет: Математика,
автор: василиса971