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

Question

Информатика

Борюся

13 августа, 18:21

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

+5

Ответы (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