Задание 6. Решение задач по теме

Номера задач задает преподаватель!

1. Составьте программу подсчета количества букв "к" в заданном слове Х.

2. Составьте программу, проверяющую, входит ли в данное слово сочетание букв "нн".

3. Составить программу, удаляющую из данного слова все буквы "о".

4. Составить программу, определяющую позицию первого вхождения буквы "т" в слово.

5. Составить программу, удваивающую каждую букву слова (Например, вместо слова "стол" должно получиться "ссттоолл").

6. Составить программу, удаляющую каждую нечетную букву слова.

7. Для каждого символа заданного слова указать, сколько раз он встречается в слове.

8. В заданном слове удалить символ "m" и подсчитать число удаленных символов.

9. В заданном слове подсчитать количество гласных букв.

10.В заданном слове заменить каждый символ "а", стоящий на четном месте, на символ "о".

11.Определить, заканчивается ли введенное слово гласной буквой.

12.Определить, превышает ли длина введенного слова заданное число.

13.Определить, является ли количество букв "о" в заданном слове четным или нечетным.

14.Проверить, есть ли в заданном слове две подряд идущие одинаковые буквы.

15.Определить, является ли длина введенного слова числом, кратным трем.

Контрольное задание

Вариант вашего задания задает преподаватель!

Отчет по заданию оформите в письменном виде!

Отчет должен содержать условия задачи, блок-схему алгоритма, текст программы, исходные данные и результаты.

1. Ввести текст, состоящий не менее чем из 14 слов, разделяющихся между собой запятыми. Изъять из текста все запятые.

2. Ввести текст, состоящий не более чем из 10 слов. Определить количество вхождений символов «to» в каждом слове.

3. Ввести текст, состоящий не более чем из 16 слов. В данном тексте заменить все буквы «а» на «о».

4. Ввести текст, состоящий не более чем из 15 слов. Из текста выделить все слова, которые начинаются с любого произвольно введенного символа.

5. Ввести текст, состоящий не менее чем из 12 слов. Определить наличие вхождений символов «no» в каждом слове текста.

6. Ввести текст, состоящий не менее чем из 13 слов, разделенных между собой точками. В данном тексте заменить все точки на запятые.

7. Ввести текст, состоящий не менее чем из 12 слов. Из данного текста выделить все слова, в которых присутствует символ «Е».

8. Ввести текст, состоящий не менее чем из 10 слов. Вставить в текст после каждого символа «к» символ «о».

9. Ввести текст, состоящий не менее чем из 13 слов. Выделить из текста все слова, которые имеют больше 5 символов, но менее 8.

10. Ввести текст, состоящий из слов и цифр. Подсчитать сколько цифр в тексте.

11. Ввести текст, состоящий из слов и цифр. Подсчитать сколько слов в тексте.

12. Ввести текст, состоящий не менее чем из 15 слов. Подсчитать количество слов, в которых присутствует символ «b» и заменить его на «f».

13. Ввести одно слово, состоящее не менее чем из 8 символов. Распечатать все части слова, начинающиеся с заданного символа.

14. Ввести текст, содержащий не менее 15 слов. Выделить из текста все слова, которые имеют пять символов, и начинаются с символа «R».

15. Ввести текст, состоящий из слов и цифр. Заменить в заданном тексте все цифры на символы «as».

16. Ввести текст, состоящий не менее чем из 13 слов. Определить количество вхождений символов «tol» в заданный текст и заменить их на символы «lot».

17. Ввести текст, состоящий не менее чем из 12 слов. Из текста выделить все слова, которые начинаются с того же символа, с которого начинается первое слово данного текста.

18. Ввести текст, состоящий не менее чем из 14 слов. Определить количество слов, которые начинаются и заканчиваются на один и тот же символ.

19. Ввести текст, состоящий не менее чем из 12 слов. Из текста выделить все слова, которые начинаются с того же символа, с которого начинается последнее слово заданного текста.

20. Ввести текст, состоящий не менее чем из 15 слов. Выделить из текста все слова, которые имеют длину 6 символов и начинаются на «С».

21. Ввести текст, состоящий не менее чем из 12 слов. Выделить из текста все слова, имеющие четное количество символов и начинающиеся с символа «D».

22. Ввести текст, состоящий не менее чем из 15 слов. Определить в каждом слове позицию вхождения символа «s».

23. Ввести текст, состоящий не менее чем из12 слов. Из данного текста выделить все слова, в которых присутствует символ «Е».

24. Ввести текст, состоящий не менее чем из 14 слов, разделяющихся между собой запятыми. Заменить все запятые на восклицательный знак.

25. Ввести текст, состоящий не менее чем из 14 слов. Вставить в текст после каждого символа «g» символ «о».

26. Ввести текст, состоящий из слов и цифр. Подсчитать сколько цифр в тексте, заменить все слова на число 100.

27. Ввести текст, состоящий из слов и цифр. Подсчитать сколько слов в тексте, заменить все числа на символы «ok!».

28. Ввести текст, состоящий не менее чем из 14 слов. Подсчитать количество слов длиной более 5 символов и начинающихся с символа «d».

29. Ввести текст, состоящий не менее чем из 15 слов. Определить количество вхождений символа «а» в каждом слове.

30. Ввести текст, состоящий не менее чем из 15 слов. Заменить все слова, которые начинаются с символа «c» на 1000.

Лабораторная работа № 10
Файлы

Цель работы: изучить практические навыки работы с переменными файлового типа.

Тип-файл представляет собой последовательность компонент одного типа, расположенных на внешнем устройстве (например, на диске). Элементы могут быть любого типа, за исключением самого типа-файла. Число элементов в файле при описании не объявляется. Работа с физическими файлами происходит через так называемые файловые переменные.

Тип-файл можно описать непосредственно при введении файловых переменных:

Var Z: File Of Real;

Файловые переменные имеют специфическое применение. Над ними нельзя выполнять никаких операций (присваивать значение, сравнивать и т.д.). Их можно использовать лишь для выполнения операций с файлами (чтение, запись и т.д.).

Элементы файла считаются расположенными последовательно, то есть так же, как элементы линейного массива. Отличие состоит в том, что, во-первых, размеры файла могут меняться, во-вторых, способ обращения к элементам совсем другой: невозможно обратиться к произвольному элементу файла; элементы его просматриваются только подряд от начала к концу, при этом в каждый момент времени доступен только один элемент. Можно представить себе, что для каждого файла существует указатель, показывающий в данный момент на определенный компонент файла. После проведения операции чтения или записи указатель автоматически передвигается на следующий компонент.

Перед тем, как осуществлять ввод-вывод, файловая переменная должна быть связана с конкретным внешним файлом при помощи процедуры Assign:

Assign(<ф. п.>,<Имя файла>);

Здесь <ф. п.> - имя файловой переменной, <Имя файла> -строка, содержащая полное имя файла на внешнем носителе.

После объявления файл должен быть открыт одной из процедур:

Reset(<ф. п.>); - открывается существующий файл для чтения, указатель текущей компоненты файла настраивается на начало файла. Если физического файла, соответствующего файловой переменной не существует, то возникает ситуация ошибки ввода-вывода.

Rewrite(<ф. п.>); - открывается новый пустой файл для записи, ему присваивается имя, заданное процедурой Assign. Если файл с таким именем уже существует, то он уничтожается.

После работы с файлом он, как правило, должен быть закрыт процедурой

Close(<ф. п.>);

Важно!

Процедура закрытия обязательно должна выполняться для файла, в который производилась запись.

Для ввода информации из файла, открытого для чтения, используется оператор Read с небольшими изменениями:

Read(<ф. п.>, <Список ввода>);

При работе оператора происходит считывание данных из файла в переменные, имена которых указаны в списке ввода. Переменные должны быть того же типа, что и компоненты файла.

Вывод информации производит оператор

Write(<ф. п.>, <Список вывода>);

Данные из списка вывода заносятся в файл, открытый для записи.

Ниже приводится список основных процедур и функций, которые используются при работе с файлами.

Seek (<ф. п.>, <N компонента>) -процедура, которая смещает указатель файла к его компоненту с номером N. (Первый компонент файла имеет номер 0!).

Filesize (<ф.п.>) -функция, которая возвращает количество компонентов файла.

Filepos (<ф.п.>) - функция, которая возвращает порядковый номер компонента файла, который будет обрабатываться следующей операцией ввода-вывода.

Eof(<ф.п.>) -функция вырабатывает значение True, если файл окончен, и False - в противном случае.