Программа на паскаль
9) Вводится произвольная последовательность целых чисел. Найти сумму чисел больших наперед заданного числа x
Ответы на вопрос
Ответил nkpk
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.
Приложения:

Новые вопросы
Математика,
2 года назад
Физика,
8 лет назад
Математика,
8 лет назад
Биология,
9 лет назад
Математика,
9 лет назад