Рассматривается множество целых чисел, принадлежащих - вопрос №213858173 от Shivan2002 03.11.2020 23:42

Question

Информатика: Рассматривается множество целых чисел, принадлежащих числовому отрезку [3672; 9117], которые удовлетворяют следующим условиям: - остаток от деления на 3 равен 2; - остаток от деления на 5 равен 4. Найдите количество таких чисел и их сумму. Гарантируется, что искомая сумма не превосходит 10⁷(ответ запишите через пробел)

Shivan2002 · Answer

const  low = 3672;  high = 9117;var sum, count:integer;begin  sum:=0;  count:=0;  for var i:=low to high do  begin    if ((i mod 3 = 2) and (i mod 5 = 4)) then    begin      inc(count);      sum:=sum + i;    end;  end;  write(count, , sum);end....