Подсчитать сумму чисел кратных 7 в промежутке от 200 до300.
Подсчитать сумму чисел кратных 7 в промежутке от 200 до300.
Гость
Ответ(ы) на вопрос:
ГостьProgram Alina;
uses crt;
const
a=200;
b=300;
var i, n, k: integer;
begin
k:=0;
for i:=a to b do
if i mod 7 = 0 then k:=k+1;
writeln('Всего ',k,' чисел, кратных 7');
end.
Не нашли ответ?
Похожие вопросы