Написать программу, которая печатает true или false в зависимости от того, выполняются или нет заданные условия: среди первых трех цифр из дробной части заданного положительного вещественного числа есть цифра 5

PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  Trunc(Frac(Abs(ReadReal('x=')))*1000).ToString.Contains('5').Println
end.

И это - всё! )))