Задано натуральное число а. Является ли оно кратным 9?
в Pascal ABC?
да
Да являетс, нам в школе говарили!
Program z1; var a:integer; begin writeln ('vvedite chislo'); readln(a); if a mod 9=0 then writeln ('da') else writeln ('net'); end.