Pascal: Даны произвольные текстовые файлы. Напишите функции, которые возвращают количество строк в файле и среднюю длину строк в тексте

Задачку прислали простенькую, но вдруг пригодится:)

Даны произвольные текстовые файлы. Напишите функции, которые возвращают количество строк в файле и среднюю длину строк в тексте

В общем-то нужно уметь читать из файлов, код будет таким:

Вывод такой:

скрин

Вывод программы на тестовом файле

Тестовый файл

Скачать проект

Добавить комментарий