Помогите разрешить задание...
Заменить в строке все числа на пробелы. Вычислить количество замен.
Проблема в том что программа считает общее количество замен(и цифр и букв), а мне нужно чтоб она считала количество замен ТОЛЬКО ЧИСЕЛ!
Я не понимаю как сделать это...(
Вот код:
program n;
var
s: string;
i: integer;
begin
Writeln ('Vvedite chisla ');
readln (s);
for i:=1 to length (s) do
if s[i] in ['0'..'9'] then
s[i]:=' ';
writeln (s);
writeln ('Kolichestvo zamen',i);
readln;
end.