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

Question

Информатика

Яков

9 июля, 17:20

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

+3

Ответы (1)

Знаете ответ на вопрос?

Розалия · 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