Помогите!

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

Question

Информатика

Петринка

19 марта, 07:06

Помогите!

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

+3

Ответы (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