Помощь - Поиск - Пользователи - Календарь
Полная версия: Задачи
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
mjey
Вот тут несколько задачек, которые училка трясет к субботе. Не поможете. Задачи на любой вкус. Заранее благодарю за помощь.
1. Текст задан строкой var St: string; Напечатать те слова, которые являются симметричными (казак).
2. Все гласные буквы, которые входят в последнее слово
3. type myfile = file of char;
Опишите процедуру next(f), заменяющую в файле каждую ЦИФРУ на следующую по величине цифру ('9'заменять на '0').
4. Напишите функцию CountStrD(f), которая находит количество строк в файле, заканчивающихся буквой "d".
5. Напишите процедуру SeekType(f), которая находит в файле, содержащем текст программы на Паскале, идентификаторы типов.
APAL
Я смотрю уже третья тема на задачи подобного типа.
Причем больше всего удивляет однотипность формулировки:
Цитата
Текст задан строкой var St: string;
,
Цитата
type myfile = file of char;
.

http://pascal.net.ru/forum/index.php?showtopic=2116
http://pascal.net.ru/forum/index.php?showtopic=2115

Толи это один и тот же пользователь, то ли они все из одной школы/института?
Но училка у них точно одна и та же! :D

Извините, если оффтоп...
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.