Question

Дано 2 целых числа. Проверить истинность высказывания "первое число кратно 3, а второе кратно 5"

Answer 1

var a,b:integer; 
begin 
read(a,b); 
if ((a mod 3=0)and(b mod 5=0)) then writeln('True')   
else writeln('Fasle'); 
end.

Вводим 12 и 15 -> true
Вводим 12 и 9 -> false