Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.04.2018, 21:27   #1
Kamelok
Пользователь
 
Регистрация: 19.11.2017
Сообщений: 36
По умолчанию Некорректный вывод. Pascal.

Код рабочий. Подскажите как сделать чтоб выводил после открытия файла список и после сортировки, сортировка делается пофамильно. Как сделать чтоб ещё выводило виде таблицы виде (Фамилия Имя Отчество). Пожалуйста.
Код:
uses crt;
const
  t = 20;
  ch: set of char = ['a'..'z', 'A'..'Z'];

var
  F: text;
  S: string;
  l: integer;
  i, j: byte;
  str: array[1..40] of string[40];

begin
  Writeln('List of students:');
  Assign(F, 'file.txt');
  Reset(F);
  l := 1;
  while not eof(F) do
  begin
    Readln(F, S);
    str[l] := S;
    inc(l);
  end;
  for i := 1 to 20 do
    write(str[i], ' ');
  for i := 1 to 20 - 1 do
    for j := 1 to 20 - i do
      if str[j][1] > str[j + 1][1] then begin
        s := str[j];
        str[j] := str[j + 1];
        str[j + 1] := s;
      end;
  writeln;
  Writeln('List sorted alphabetically:');
  for i := 1 to 20 do
  begin
    writeln(str[i], ' ');
  end;
  writeln;
  Close(F);
end.
Список студентов в файле задан виде просто перечислений в виде:
Bolgov Artem Igorevich.
Gracheva Anna Alexeevna.
Gunkina Darya Alexandrovna.
Dokuchaeva Kristina Alekseevna.
Zelenov Vladimir Eduardovich.
Vasiliev Denis Filippovich.
Vasilyeva Natalya Vasilyevna.
Volova Anna Dmitrievna.
Glembo Alexey Sergeevich.
Antonov Anton Igorevich.
Изображения
Тип файла: png 2018-04-16_21-28-26.png (11.7 Кб, 43 просмотров)

Последний раз редактировалось Kamelok; 16.04.2018 в 22:13.
Kamelok вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
С, строки. Некорректный вывод в файл кириллицы Алексей_2012 Общие вопросы C/C++ 5 09.10.2016 13:04
Некорректный вывод вещественных элементов массива. Pug_from_Mordor Помощь студентам 2 04.01.2015 16:21
Некорректный вывод результата (1,#J) Drozd Oleg Общие вопросы C/C++ 3 25.09.2011 12:31
Некорректный вывод изображения Манжосов Денис :) Gamedev - cоздание игр: Unity, OpenGL, DirectX 3 24.07.2010 00:12