PDA

Просмотр полной версии : Задачка на Pascal



Kus
01.04.2008, 18:35
Вот такая вот задачка:
Создать текстовый файл fonotek.txt, содержащий сведения о музыкальных альбомах различных групп (название группы, название альбома, год выпуска, стиль). Удалить из файла все альбомы в стиле pop и techno. Переписать в другой файл информацию об альбомах в порядке убывания года выпуска.
Если нетрудно =)

MOTOCoder
01.04.2008, 19:03
Задача, как я понял, на типизированные файлы?

Medved
01.04.2008, 19:26
Задача, как я понял, на типизированные файлы?
Задача, как я понял, на строки =) Типа найти в строке два последних слова если последнее слово pop или techno удалить строку иначе записать строку в какой-то массив. Потом отсортировать массив по предпоследнему слову.

MOTOCoder
01.04.2008, 20:31
Вот это не факт-такие задачи, где есть несколько полей чаще всего подразумевают использование записей и типизированных файлов.

Kus
02.04.2008, 09:57
В принципе решать без разницы как, суть в том что получится =)
И ещё, работа осуществляется с сформированным файлом, наподобие вот этого:

MOTOCoder
02.04.2008, 14:29
А че тут непонятного?
Создать тип "запись" с нужными полями, написать функции для формирования записи из строки и наоборот.
Ну а дальше сортировка, запись и все такое.

Dim...ON
02.04.2008, 14:31
Kus, ну Medved подсказал тебе как её делать. В бой!
А если ты хочешь, чтобы тебе прислали готовую программу, то за работу надо платить. Могу поработать на тебя, мои контакты тут:
http://forum.developing.ru/showthread.php?t=13351

Kus
03.04.2008, 10:42
Ясно.
Как можно определить конец строки (не файла)?

Хыиуду
03.04.2008, 10:44
eoln(f), где f - файловая переменная

Kus
03.04.2008, 17:15
eoln(f), где f - файловая переменная
Спасибо :)
А как удалить одну строку из файла? (кроме как просматривать файл заново, и удалять строки по порядку)?

Хыиуду
04.04.2008, 10:58
Если текстовый - то никак. Т. е. только вариантом "кроме как".