Разработка базы данных, отражающей учет успеваемости студентов
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: bestreferat ru, роботы реферат
| Добавил(а) на сайт: Жичкин.
Предыдущая страница реферата | 14 15 16 17 18 19 20 21 22 23 24 | Следующая страница реферата
end;
tem1:=tem1^.sled;
end;
end;
5:begin {Вывод всех студентов с избранной оценкой}
writeln('Введите оценку');
readln(str1);
tem1:=tt4; tem2:=tt1;
textcolor(red);
while tem1<>nil do begin
if tem1^.tabl.t2=str1 then begin
str2:=tem1^.tabl.t4;
while tem2<>nil do begin
if tem2^.tabl.t1=str2 then begin
with tem2^.tabl do
writeln('Студент-',t3,' ',t4,' ',t2);
nay:=true;
end;
tem2:=tem2^.sled;
end;
end;
tem2:=tt1; tem1:=tem1^.sled;
end;
end;
6:begin {Найти дату сдачи предмета}
Рекомендуем скачать другие рефераты по теме: сочинение изложение, курсовые работы бесплатно.
Категории:
Предыдущая страница реферата | 14 15 16 17 18 19 20 21 22 23 24 | Следующая страница реферата
Главная