Проверьте кратна ли сумма трех произвольных чисел, введенных с клавиатуры, увеличеннная в 15 р, числами 7 и 9 одновременно

var a,b,c:integer;beginwriteln('введите через пробел три числа');read (a,b,c);if (15*(a+b+c) mod 7=0) and (15*(a+b+c) mod 9 =0) then writeln('кратна') else writeln ('не кратна')end.