Помогите решить задачу по информатике на Паскале (+50 баллов)

паскаль Информатика

Дан текстовый файл, подсчитать сколько слов в этом файле начинаются на букву "а" ну или на любую другую. Задача должна быть решена на Паскале.
Пример текстового файла:

яндекс
апорт
майл
агава
гугль
Ответы:
типа турбопаскаль?
ну там что то вроде
assign(переменная, имяфайла.txt); //Ну или assignfile, не помню
x=pos(переменная, " а");
//pos - нахождение кол-ва данных фрагментов в стринге, обрати внимание, "_пробел_а"
writeln x;
в смысле не пробел, а энтер, он в дельфе выглядит как #13, можно его и на бумаге записать если хорошо попробовать)


16 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.