54

Найдите сумму кратных 7 чисел, меньших 100

medved 08 марта 2023

Найдите сумму кратных 7 чисел, меньших 100

категория: информатика

75

Var s,i: integer; begin for i: =1 to 99 do if i mod 7=0 then s: =s+i; writeln (s); end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...