Дано число n определить заканчивается ли сумма цифр на 5

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  var (s,x):=(ReadlnString('Введите число, можно нецелое:'),0.0);  if TryStrToFloat(s,x) then     if s.Where(c-> c in ['0'..'9']).Select(c->c.ToDigit).Sum mod 10=5    then Writeln('Сумма цифр заканчивается на 5')    else Writeln('Сумма цифр не заканчивается на 5')  else Writeln('Неверное представление числа')end.ПримерыВведите число, можно нецелое: -3532175Сумма цифр не заканчивается на 5Введите число, можно нецелое: 0.02432413Сумма цифр не заканчивается на 5Введите число, можно нецелое: -13.05360214Сумма цифр заканчивается на 5Введите число, можно нецелое: 1.23007e-31Сумма цифр не заканчивается на 5