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

Var a,b,c:integer;
begin
writeln(введите через пробел три числа);
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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.