Разработка базы данных, отражающей учет успеваемости студентов
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: bestreferat ru, роботы реферат
| Добавил(а) на сайт: Жичкин.
Предыдущая страница реферата | 4 5 6 7 8 9 10 11 12 13 14 | Следующая страница реферата
else begin
if i=2 then textcolor(9)
else textcolor(3);
gotoxy(8,i+3);write(m.st[i]);
end;
end;
end;
procedure krutis; {Звездочка рядом с активным элементом}
begin
textcolor(14);
if kr='/' then kr:='-'
else if kr='-' then kr:=''
else if kr='' then kr:='|'
else kr:='/';
gotoxy(6,tek+3);write(kr);
textcolor(3);
end;
procedure ramka(ch:char); {перемещение указателя}
begin
gotoxy(6,tek+3);Writeln(' ');
textcolor(3);gotoxy(8,tek+3);write(nast.st[tek]);
if ch='+' then tek:=tek+1
else tek:=tek-1;
if tek=1 then tek:=nast.m
else if tek=nast.m+1 then tek:=2;
Рекомендуем скачать другие рефераты по теме: сочинение изложение, курсовые работы бесплатно.
Категории:
Предыдущая страница реферата | 4 5 6 7 8 9 10 11 12 13 14 | Следующая страница реферата
Главная