Реферат: Разработать программу на алгоритмическом языке программирования С , реализующую учебную систему

// Проверка, активизировать ли

if (ts) {

// Прорисовка активного состояния

setfillstyle(1,apap)

setcolor(ink)

bar(x,y,x+dx,y+dy)

rectangle(x+3,y+3,x+dx-3,y+dy-3)

char c

// Обработка клавиатуры - TAB - следующее, ESC - выход

do {

c=getch()

} while ((c!=9)&&(c!=27))

if (c==27) f_exit=1

return next

} else return next

// Нет - вернуть указатель на следующее

}

// Изменениефлага TS

void wind::setact(char a) {

ts=a

}

// Класс строк редактирования -----------------------------

// Конструктор

ed_win::ed_win(int ix,int iy,int idx,int idy,char * p,int mln):

wind(ix,iy,idx,idy) {

maxlen=mln

strcpy(capt,p)

strcpy(pcapt,p)

}