Подсчитать сумму чисел кратных 7 в промежутке от 200 до300.

0 голосов
41 просмотров

Подсчитать сумму чисел кратных 7 в промежутке от 200 до300.


Информатика (23 баллов) | 41 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

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.

(52.6k баллов)