Программу, которая определяет кратна ли числу а сумма - вопрос №1493684 от murat200202 29.03.2021 05:34

Question

Информатика: Программу, которая определяет кратна ли числу а сумма цифр двухзначного числа

murat200202 · Answer

var a,a1,a2,a3:integer;

begin

read(a); - читаем данное число

a1:=a mod 10;

a2:=a div 10;

a3:=a1+a2;

if a3 mod = 0 then write('да')

else(write('нет');

end.