Найти количество цифр 7 в натуральном числе n.

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var n:=ReadInteger('введите натуральное число:');
write('в числе ',n.ToString.Where(x->x='7').Count,' цифр 7');
end.