Помогите!

Дано трёхзначное число, определить кратна ли сумма его цифер числу а. Число 123, а=5

Question

Информатика

Алексеич

26 июня, 02:50

Помогите!

Дано трёхзначное число, определить кратна ли сумма его цифер числу а. Число 123, а=5

+5

Ответы (1)

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

Лев · Answer 1

Begin

read (n, a) ;

for i: = 1 to 3 do

begin

summ : = summ + n mod 10;

summ : = summ div 10;

end;

if summ mod a = 0 then write ('кратно') else write ('не кратно') ;

end.

Помогите!Дано трёхзначное число, определить кратна ли сумма его цифер числу а. Число 123, а=5

Помогите!

Дано трёхзначное число, определить кратна ли сумма его цифер числу а. Число 123, а=5