Question

задано натуральное число а. Является ли оно кратным 9?

Answer 1

program z1;
var a:integer;
begin
writeln ('vvedite chislo');
readln(a);
if a mod 9=0 then
writeln ('da') else
writeln ('net');
end.