Реферат: Создание текстового редактора

textbackground(blue);

clrscr;

textcolor(yellow);

w:=1;

h:=1;

c1:=chr(218);

c2:=chr(196);

c3:=chr(191);

c4:=chr(179);

c5:=chr(192);

c6:=chr(217);

c7:=chr(195);

c8:=chr(180);

c9:=chr(193);

c10:=chr(194);

for h:=2 to 25 do

begin

gotoxy(w,h);

write(c4);

end;

gotoxy(w,h);

write(c5);

for w:=2 to 79 do

begin

gotoxy(w,h);

write(c2);

end;

gotoxy(w,h);

write(c6);