Предмет: Информатика,
автор: Quteria
Написать программу в Паскале. (задача)
Пользователь вводит целые числа, 0 это финиш, просуммировать все числа в диапазоне от 5 до 15 включительно
Ответы
Автор ответа:
1
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write(ReadSeqIntegerWhile(x->x<>0).Where(f->f in [5..15]).Sum);
end.
//Версия 3.3, сборка 1634
begin
write(ReadSeqIntegerWhile(x->x<>0).Where(f->f in [5..15]).Sum);
end.
Quteria:
спасибо конечно, но можно попроще?
Похожие вопросы
Предмет: Математика,
автор: gaybulaevasetora
Предмет: Информатика,
автор: Serebryanskay272
Предмет: Литература,
автор: masahottanen
Предмет: Обществознание,
автор: sani199942
Предмет: Алгебра,
автор: Сабииииии