Помогите в 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 И опять ищи новую цифру, и так по кругу. Источник я указала, там есть информация о функциях.
а где сам файл
Не нашли ответ?
Похожие вопросы