Предмет: Информатика,
автор: 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.
Приложения:
Похожие вопросы
Предмет: Литература,
автор: lubenecnatalya
Предмет: Биология,
автор: chubainna
Предмет: Химия,
автор: RamseyFollow
Предмет: Математика,
автор: василиса971