Ввести с клавиатуры целое число вывод на экран верноли это введеное число оканчивается на 3

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Abs(ReadInteger) mod 10=3)
end.

Примеры
2453
True

-106463
True

4353421
False

Var x,y:integer;
Begin
Write('Введите число: ');
Readln(x);
If x mod 10 = 3 then Writeln('Да')
else Writeln('Нет');
End.

После Writeln('Да') точка с запятой НЕ нужна!