Вывод данных из типизированного файла

@Grig95 · Регистрация: 07.03.2015

Студворк — интернет-сервис помощи студентам

Здравствуйте! У меня такой вопрос.
Имеется типизированный файл след. стр-ры:

Delphi
1
2
3
4
5
6
Data = record
         FIO:string[17];
         Group:string[8];
         Discipline:string[20];
         Mark:string[1];
f:file of Data;

При попытке организовать вывод из файла на экран оказывается, что он не разделяет корректно слова.
файл такой

содержимое)

Code
1
2
3
4
5
6
7
8
9
10
Иванов И.И.      ФМ-1-02 Высшая математика   4
Петров П.П.      ФМ-1-02 Высшая математика   3
Сидоров С.С.     ФМ-2-02 Физика              3
Иванов И.И.      ФМ-1-02 Физика              5
Петров П.П.      ФМ-1-02 Физика              4
Иванов И.И.      ФМ-1-02 Информатика         4
Сидоров С.С.     ФМ-2-02 Информатика         5
Кузнецов К.К.    ФМ-2-02 Физика              3
Петров П.П.      ФМ-1-02 Философия           4
Кацман К.К.      ФМ-3-02 Философия           5

Долго по-разному пытался - толку ноль.

@Sergio Leone · 15.03.2015, 14:47

Сообщение от Verevkin

а ты попробуй через стрим. а я дополню.
тебе понравится,

я это делал неоднократно. не скажу, что настолько от этого в восторге, что брошу всё и буду этим заниматься

вот ты напиши, посмотрим, как проще!

Verevkin · 15.03.2015, 15:00

Сообщение от Sergio Leone

вот ты напиши, посмотрим, как проще!

не буду. у меня уважительная причина - мне лень. я на диване лежу, тиливизер гляжу.

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .