Составить программу которая считывает целое число и проверяет оканчивается ли оно на 0

Question

Алевтиныч

26 мая, 10:20

+3

Ответы (1)

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

Павлюся · Answer 1

Var

a:integer;

begin

Read (a) ;

if a mod 10 = 0 then Writeln ('Оканчивается на 0')

else writeln ('не оканчивается на 0') ;

end.