Question

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

Answer 1

//PascalABC.NET 3.3,сборка 1627 от 27.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

  var a:=readinteger('Введите число ->');

  if a mod 10 = 0 then writeln('оканчивается  на ноль')

  else Write('не оканчивается  на ноль');

end.