Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
battousai
0 / 0 / 1
Регистрация: 29.12.2013
Сообщений: 2
1

Напечатать таблицу данных, отсортированных по возрастанию цены билета бизнес-класса

29.12.2013, 14:25. Просмотров 862. Ответов 2
Метки нет (Все метки)

Здравствуйте,помогите с задачей.
Дан файл записей,содержащий:номер рейса,пункт отправления,пункт прибытия,класс билета,цена,время полета,название компании.Напечатать таблицу данных,отсортированных по возрастанию цены билета бизнес-класса.
Ввод сделал,как сортировать не знаю
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.12.2013, 14:25
Ответы с готовыми решениями:

Реализовать зависимость класса билета от его цены
Прикрепляю скрин как примерно должно быть. Прикрепляю базу. 1. В форме...

Из двух отсортированных по возрастанию массивов сформировать третий, отсортированный также по возрастанию
Нужно написать программу с тремя массивами :| Из двух отсортированных по...

Отсортировать таблицу по возрастанию цены - для чётного и по убыванию – для нечётного
Отсортировать созданную таблицу по возрастанию цены - для чётного и по убыванию...

Дан массив a из n элементов отсортированных по возрастанию
Дан массив a из n элементов отсортированных по возрастанию. Вставить в массив...

Определить количество строк, отсортированных по возрастанию
Помогите как реализовать еще одно условие: 1.) определить количество строк,...

2
volvo
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
26485 / 17786 / 7037
Регистрация: 22.10.2011
Сообщений: 31,306
Записей в блоге: 6
29.12.2013, 14:29 2
Код можно посмотреть?

Кстати, сортировок тут на форуме - море, при чем большое озеро из них - это именно сортировки массивов записей. Все точно так же, как и при упорядочивании обычного численного массива, только добавляется еще одно название поля, по которому и надо отсортировать массив записей. Да и с файлами тоже есть примеры.
0
battousai
0 / 0 / 1
Регистрация: 29.12.2013
Сообщений: 2
29.12.2013, 14:31  [ТС] 3
Лучший ответ Сообщение было отмечено battousai как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
type reis=record
     nomer:integer;
     p1:string;
     p2:string;
     klass:string;
     price:integer;
     time:integer;
     tip:string;
     avia:string;
end;
var f:file of reis;
    g:file of integer;
    x:array [1..10] of reis;
    i,n:integer;
begin
        assign(f, 'f.dat');
        assign(g, 'g.dat');
        rewrite(f);
        readln(n);
        for i:=1 to n do
        begin
                readln(x.nomer);
                readln(x.p1);
                readln(x.p2);
                readln(x.klass);
                readln(x.price);
                readln(x.time);
                readln(x.tip);
                readln(x.avia);
                write(f,x);
        end;
        close(f);
        reset(f);
        while not eof(f) do
        begin
                read(f,x);
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.12.2013, 14:31

Необходимо записать число из цифр, отсортированных по возрастанию
В строке с символами встречаются цифры. Необходимо записать число из этих цифр,...

Определить количество строк матрицы, отсортированных по возрастанию
Дана целочисленная квадратная матрица. 1) для каждой строки определить...

Вывод в файл чисел, отсортированных по возрастанию по 3 числа в строчку
из текстового файла считываем строчку чисел. Выводим в другой файл эти числа,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru