Регистрация
richietozier6
28.07.2022 02:01
Информатика
Есть ответ 👍

Паскаль дано натуральное число м. написать программу для вычисления суммы и произведения чисел кратных 7 от 5 до м. входные данные n=14 выходные данные 21 98

243
290
Посмотреть ответы 2

Ответы на вопрос:

Kozlov24ivan122
Kozlov24ivan122
4,5(9 оценок)
// pascalabc.net 3.1, сборка 1174 от 22.02.2016 begin   var m: =readinteger('m=');   if m< 7 then println('нет чисел, кратных 7')   else begin       var s: =range(7,m,7);       println(s.sum,s.aggregate(1,(p,i)-> p*i))       end end.
dzhusanastasia
dzhusanastasia
4,5(31 оценок)

integer

Объяснение:

Определяется словом integer

Популярно: Информатика