Подсчитать количество цифр в строке. Паскаль. Пример кода

Общая идея подсчета числа цифр в строке в Паскаль состоит в следующем (сразу приведём здесь код программы):

{подсчёт числа символов цифр в строке}
var s:string;  i,n:Integer;
begin
    readln(s);
    n := 0;
    for i:=1 to Length(s) do begin // обходим строку в цикле
        if (s[i]>='0')and(s[i]<='9') then inc(n);
    end;

    writeln('This string contains ',n,' digits.'); // выводим массив
end.

-- в этой программе для считывания значения мы использовали переменную строкового типа.

Паскаль даёт возможность обращения к конкретному символу строки по индексу как к элементу одномерного массива.

Источники:

1. Подсчитать количество цифр, входящих в строку - Pascal: http://www.cyberforum.ru/pascal/thread82...