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

Label b; {метка}

Var {тело}

Programname,Cmdline:string;

nn,i,x,y:integer;

f1,f1_new:text;

Name,New_name:string[12];

txt,text:string;

ch:char;

begin

i:=1;

textbackground(red);

clrscr;

textcolor(yellow);

gotoxy(22,10);

writeln('Текстовый процессор Timofeev Word');

gotoxy(22,11);

writeln(' Версия 1.0 (2001 год)');

gotoxy(40,15);

writeln('Составил Тимофеев Тимур (2-АС-3)');

textcolor(green);

gotoxy(40,16);

writeln('Все права защищены.');

gotoxy(40,17);

writeln('Незаконное копирование');

gotoxy(40,18);

writeln('или подделка без согласия автора');

gotoxy(40,19);

writeln('преследуется по понятиям !!!');

delay(5000);