Реферат: Паскаль (практическое использование)

Gotoxy(45,15); {Установка курсора в заданные координаты: X,Y}

WriteLn('учащегося 11 класса А школьно-');

Gotoxy(45,16); {Установка курсора в заданные координаты: X,Y}

WriteLn('подготовительного факультета ТПУ');

TextColor(0); {Установка цвета текста}

Gotoxy(45,17); {Установка курсора в заданные координаты: X,Y}

Writeln('Дмитриевой Светланы');

TextColor(3); {Установка цвета текста}

Gotoxy(45,19); {Установка курсора в заданные координаты: X,Y}

WriteLn('Руководитель');

Gotoxy(45,20); {Установка курсора в заданные координаты: X,Y}

Writeln('учитель информатики');

TextColor(0); {Установка цвета текста}

Gotoxy(45,21); {Установка курсора в заданные координаты: X,Y}

WriteLn('Сидорова Е.В.');

TextColor(12); {Установка цвета текста}

GOTOXY(0,25); {Установка курсора в заданные координаты: X,Y}

Line80; { нарисовать линию }

TextColor(8); {Установка цвета текста}

Gotoxy(50,27); {Установка курсора в заданные координаты: X,Y}

Writeln('Для продолжения нажмите [ENTER]');

Readln;

TextBackground(red); {Установка цвета экрана}

TextColor(14+16); {Установка цвета текста}

CLRSCR; {Очистка и закраска фона экрана}

Gotoxy(8,12); {Установка курсора в заданные координаты: X,Y}

WriteLn('Имя:'); {вывод текста на экран}

GOTOXY(13,12); {Установка курсора в заданные координаты: X,Y}

ReadLn(o); {ввод значения о с клавиатуры}