Составить программу, печатающую значение true, если указанное высказывание является истин-ным, и false в противном случае, когда целое a не кратно трем и оканчивается нулем.

Question

Полиект

14 августа, 03:09

+5

Ответы (1)

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

Антоний · Answer 1

program exs;

var a: integer;

b : boolean;

begin

read (a) ;

b: = (a mod 3 0) and (a mod 10 = 0) ;

writeln (b) ;

end.