Определить, у каких групп совпадают аудитории на занятиях

@pro_100_den · Регистрация: 17.10.2011

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

Опишите, используя структуру данных запись, расписание (предмет, преподаватель, номер группы, день недели, часы, аудитория). Составьте программу, определяющую у каких групп совпадают аудитории на занятиях;

Добавлено через 1 минуту
а вот мой алгоритм

Pascal

program hh;
uses crt;
type raspisanie=record
predmet:string;
prepod:string;
nomer:integer;
den:string;
chas:string;
audit:integer;
end;
var
student:array [1..100] of raspisanie;
i,n,l:integer;
k:string;
begin
ClrScr;
writeln('vvedite col-vo studentov');
readln (n);
for i:=1 to n do
begin
writeln ('svedenia o ',i,' studente');
writeln ('predmet');
readln (student[i].predmet);
writeln ('prepodavatel');
readln (student[i].prepod);
writeln ('nomer gruppi');
readln (student[i].nomer);
writeln ('den sdachi');
readln (student[i].den);
writeln ('vremya');
readln (student[i].chas);
writeln ('auditoria');
readln (student[i].audit);
end;
writeln ('gruppi s odnoi auditoriei');
for i:=1 to n do
if (student[i].audit=student[i+1].audit)then
writeln (student[i].nomer,' gruppa');
end.

Комментарий модератора

Теги кода добавлены модератором. По правилам форума, код должен быть оформлен соответствующими тегами. Для оформления кода Pascal следует выделить этот код и на панели редактирования сообщения нажать кнопку: "PASCAL".

@Sweet_Sleep · 26.11.2011, 16:34

Зря вы пренебрегаете тегами для кода)
Мне кажется что задача, которую вам поставили и вы осуществили не соответствуют друг другу. У вас - проверка идет по студентам, а требуется в задании по группам(что логичнее, так как расписание делают на группу, а не на студента).
так что может вам сделать массив с названием Gruppa и убрать его из записи? По вашей программе,если два студента учатся в одной группе, то она два раза выдаст все аудитории, которые у них есть в расписании.

@BouH · 27.11.2011, 00:56

И еще при поиске совпадений два цикла нужно, иначе у вас сравнивается только два студента: тот что Итый и следующий Итый+1

@Sweet_Sleep 10 / 10 / 1 Регистрация: 04.11.2009 Сообщений: 147
	26.11.2011, 16:34	2
	Зря вы пренебрегаете тегами для кода) Мне кажется что задача, которую вам поставили и вы осуществили не соответствуют друг другу. У вас - проверка идет по студентам, а требуется в задании по группам(что логичнее, так как расписание делают на группу, а не на студента). так что может вам сделать массив с названием Gruppa и убрать его из записи? По вашей программе,если два студента учатся в одной группе, то она два раза выдаст все аудитории, которые у них есть в расписании. 0

@BouH 54 / 54 / 43 Регистрация: 11.12.2009 Сообщений: 110
	27.11.2011, 00:56	3
	И еще при поиске совпадений два цикла нужно, иначе у вас сравнивается только два студента: тот что Итый и следующий Итый+1 0