Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Помогите!типизированные файлы

Автор: sergant 10.11.2003 21:20

в N файлах создать сведения о студентах N групп.Формат сведений: номер группы,порядковый номер,фамилия,имя,отчество.Выбрать всех однофамильцев из всех групп и сформировать последовательность.Обеспечить вывод результата поиска.
Не могу сделать поиск однофамильцев.Если кто может-помогите пожалуйста.Спасибо.

Автор: SKVOZNJAK 11.11.2003 0:01

Кто ищет - тот найдёт! Не получается с типизованными, используй нетипизованные  :) Меньше правил, больше свобода действий. Где-то на форуме такая задача уже была.

Автор: GLuk 11.11.2003 16:32

Приведи код, а там и посмотрим... ;)

Автор: mvg 11.11.2003 18:28

и в чем трабла? задача типовая ... но код получится немаленький.
Кину идейку.

пусть есть у тебя  тип STUDENT.
тогда F:file of Student; Кроме того есть файл A:text, в котором N строк.- в нем в текст. виде лежит список имен файлов обраб. групп. нечто типа
1.txt
2.txt
....

Есть еще файл Result тоже типа Student.

Так вот Читаешь 1-ю запись 1 -го файла и ищеш совпадение по ВСЕМУ списку файлов.
ежели совпадений польше 1 - в Result его.

и так по всему списку.

Понятно?