Предмет: Информатика, автор: tuzhilkina

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

Ответы

Автор ответа: AnonimusPro
0
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.
Предыдущий вопрос
Следующий вопрос
Интересные вопросы
Предмет: Українська мова, автор: valera20209
Помогите пожалуйста ​
6 лет назад
Предмет: Русский язык, автор: 1358p1069959
Составьте с пятью любыми разносклоняемыми существительными предложения,
употребив эти существительные как в именительном, так и в косвенных падежах.
Выделите в разносклоняемых существительных окончания
6 лет назад
Предмет: Математика, автор: deadinside001
УМОЛЯЮ
ЗНАЙТИ 2⅕ ОТ 0,35​
6 лет назад
Предмет: Математика, автор: Аноним
Решить задачу: Учитель раздал 5 ученикам по 2 тетради, и у него осталось на столе ещё 6 тетрадей. Сколько тетрадей раздал учитель? Сколько тетрадей у учителя было?
9 лет назад
Предмет: Алгебра, автор: Аноним
Упростите выражение:
а)(x+2)(2x-1)
б)(2-y)(y2+3)
в)(a+4)(1-a)+a2
г)(m+2)(m2-m+2)
9 лет назад