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

Question

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

Answer 1

Var
a:integer;
begin
Read(a);
if a mod 10 = 0 then Writeln('Оканчивается на 0')
  else writeln('не оканчивается на 0');
end.

Comments

спс

Answer 2

//PascalABC.NET
//Версия 3.3, сборка 1611
begin
write((ReadInteger() mod 10=0)?'оканчивается на 0':'не оканчивается на 0');
end.