Найдите сумму всех трехзначных чисел, которые при деление на 47 дают в остатке 43. (Для нахождения остатка использовать функцию MOD)

Question

Авдоша

14 мая, 04:08

+4

Ответы (1)

Знаете ответ на вопрос?

Аврея · Answer 1

Program n1;

var i, sum: integer;

begin

sum:=0;

for i:=100 to 999 do if i mod 47=43 then sum:=sum+i;

write (sum) ;

end.