// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
Writeln('Количество пятерок в числе равно ',
ReadInteger('n=').ToString.Where(c->c='5').Count)
end.
<u><em>Тестовое решение:</em></u>
n= 3456453
Количество пятерок в числе равно 2
15457 = 1*10^4 + 5*10^3 + 4*10^2 + 5*10^1 + 7*10^0
Вот тут написаны все свойства информации .
<span>1)открытие файла
9)сохранение файла</span>