Работа с внешними файлами, помогите решить задачку plizzzz Опции

[Артём]

Здрасте всем
помогите пожалуйста вот стакой задачкой
создать файл, содержащий сведения об аудиторных занятиях (предмет, преподаватель, номер группы, вид занятий, день недели, часы занятия, аудитория).
а) выбрать все занятия по данному предмету
б) упорядочить занятие каждой группы по дням недели.
в) выбрать все занятия в данной аудитории

[klem4]

пользуйся поиском, "задача записи", "типизированный файл"

В чем проблема, что конкретно не получается ?

Сообщение отредактировано: klem4 - 22.12.2005 3:21

[Артём]

пользуйся поиском, "задача записи", "типизированный файл"

В чем проблема, что конкретно не получается ?

в том то и дело что ничего не получается
я даже понятия не имею как елать это задание

[volvo]

Ну, так посмотри, как делались аналогичные задания. Тебе же сказали, что есть Поиск по форуму. Что, этим тоже лень воспользоваться? Надо готовые ссылки "на блюдечке" выложить? Ну держи... Только поможет ли

Задача на файлы
Телефонный справочник

Хватит?

[Артём]

расскажите пожалуйсто если можно подробно как сделать вот это задание

в) выбрать все занятия в данной аудитории

[APAL]

расскажите пожалуйсто если можно подробно как сделать вот это задание

в) выбрать все занятия в данной аудитории

Просматриваешь все записи по очереди и если там попадется нужная аудитория - печатаешь.

[Артём]

блин ошибся я сделал это задание!!!
я не понял как б) упорядочить занятие каждой группы по дням недели. обясните пожалуйста

[Romtek]

В ЧАВО искал?
http://forum.pascal.net.ru/index.php?showtopic=2401

[Артём]

если чесно то я ничего не понял из данного примера.
объясните пожалуйсто по подробнее

ну раскажите как можно упорядочить занятия по дням недели
очень надо

блин никак не могу упорядочить у меня такой вопрос если я выложу сюда текст программы может кто сможет сделать (упорядочить занятие каждой группы по дням недели)?

[klem4]

Не надо тут флуд разводить, сообщения объеденены, выкладывай что у тебя не получается ...

[Артём]

вот

Код

program LR_9;
type
cveden=record
predmet,prepod,vid_zan,den_nedel:string [25];
nomer_gr,chas,audit:integer;
end;
spisok= file of cveden;
var
spi:spisok;
cv:cveden;
x,z:string [30];
y:integer;
i:integer;
begin
assign (spi,'c:\bid3d.dat');
rewrite (spi);
for i:=1 to 2 do
begin
with cv do
begin
writeln ('введите предмет:');
readln (predmet);
writeln ('введите имя преподавателя:');
readln (prepod);
writeln ('введите вид занятий:');
readln (vid_zan);
writeln ('введите день недели:');
readln (den_nedel);
writeln ('введите номер группы:');
readln (nomer_gr);
writeln ('введите часы занятий:');
readln (chas);
writeln ('введите № аудитории:');
readln (audit);
end;
write (spi,cv);
end;
close (spi);
reset (spi);
writeln ('введите предмет:',x);
read (x);
for I:=1 to 2 do
begin
read (spi,cv);
if cv.predmet=x then
writeln (cv.prepod,' ',cv.vid_zan,' ' ,cv.den_nedel,' ',cv.nomer_gr,' ',cv.chas,' ',cv.audit );
end;
close (spi);
reset (spi);
writeln ('введите № аудитории:');
read (y);
for i:=1 to 2 do
begin
read (spi,cv);
if cv.audit=y then
writeln (cv.prepod,' ',cv.vid_zan,' ' ,cv.den_nedel,' ',cv.nomer_gr,' ',cv.chas,' ',cv.audit );
end;
close (spi);
end.

надо упорядочить зантия каждой гр. по дням недели

Сообщение отредактировано: volvo - 30.12.2005 17:10

[Артём]

Ну помогите пожайлусто с этим задание упорядочить занятие каждой группы по дням недели.
я никак немогу его сделать
очень надо

[volvo]

Артём, тебе же приводили ссылку на пример решения задачи из FAQ-а... Что, ты думаешь, кто-то будет специально для тебя переписывать то же самое еще раз? Не понял - разбирайся! Все равно без массива (одним файлом) тут не обойдешься; тебе надо сначала сортировать по номеру группы, потом записи с одинаковым номером группы - еще и по дню недели...