Помогите в pascal"e. посчитать количество цифр в файле text.txt.

Помогите в pascal"e. посчитать количество цифр в файле text.txt.
Гость
Ответ(ы) на вопрос:
Гость
Сначало используй функцию: Function Pos(Substr: String; S: String): Integer Которая найдёт тебе в строке "Substr" твою цифру "S" (используй цикл) . Но первоначально, считай в переменную "Substr" - весь текстовый файл. После обрешь строку, с помощью функции: Function Copy(S: String; Index, Count: Integer): String И опять ищи новую цифру, и так по кругу. Источник я указала, там есть информация о функциях.
Гость
а где сам файл
Не нашли ответ?
Ответить на вопрос
Похожие вопросы