Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
111
Добавлен:
02.05.2014
Размер:
813.06 Кб
Скачать

Управление символьным выводом на экране.

Использование программистом только процедур Write, Writeln дает очень слабые возможности для управления расположением данных на экране. Дополнительные возможности управления дают процедуры и функции модуля CRT.Чтобы воспользоваться ими, необходимо подключить модуль- USES CRT.

Рассмотрим основные процедуры и функции модуля:

Каждая символьная позиция определена на экране двумя координатами Х и У.

Для установки курсора в нужную позицию существует процедура: Gotoxy(x,y) , где х,у- переменные типа Byte.

Clrscr- очистка экрана

TextBackGround(color)- устанавливает цвет фона, который задается переменной color типа Word или постоянной.

TextColor(color)- устанавливает цвет текста, который задается переменной color типа Word или постоянной.

Цвет

Константа

Код

Черный

Black

0

Синий

Blue

1

Зеленый

Green

2

Бирюзовый

Gyan

3

Красный

Red

4

Розовый

Magenta

5

Коричневый

Broun

6

Светло-серый

LightGray

7

Темно-серый

DarkGray

8

Светло-синий

Light Blue

9

Светло-зеленый

Light Green

10

Светло-бирюзовый

Light Gyan

11

Светло-красный

Light Red

12

Светло-розовый

Light Magenta

13

Желтый

Yellow

14

Белый

White

15

KeyPressed- функция, которая принимает значение True, если нажата любая клавиша и False в противном случае.

Delay(х)-процедура которая задерживает выполнение программы на х мсек.

Лекция 14.

Что выведет данная программа?

Program _;

Const n=0.5

Var x,y:real;

Z:byte;

Begin

Write(‘введите x,y ’);

Read(x,y);

Z:=10;

Writeln(‘результат=’);

Write(x+y-z:10:2)

end.

Если с клавиатуры вводим 5 6 7

Program _;

Const n=8,8;

M=10;

begin

Writeln(‘пример’);

Write(‘n’);

Writeln(n);

Write(‘m’);

Writeln(m:5);

end.

Операторы Turbo Pascal. Простые операторы. Составной.

Оператор-предложение ЯП, задающее полное описание некоторого действия, которое необходимо выполнить.

Все операторы Turbo Pascal делятся на простые и структурные. Простым называется оператор, не содержащий никаких других операторов.

К простым операторам относятся:

Оператор присваивания

Go to

Пустой

Оператор вызова процедуры

Оператор присваивания обозначается := . Имеет следующий формат записи

<имя переменной>:=<выражение>;

Оператор присваивания выполняется следующим образом: вычисляется выражение, стоящее в правой части, и результат помещается в ячейку памяти, отведенную переменной, стоящей в левой части. Переменная и результат должны быть совместимых типов.

Зам! На месте выражения может стоять переменная, постоянная.

Пустой оператор служит для синтаксических целей и не выполняет никаких действий.

Оператор вызова процедуры служит для активации процедуры, предварительно описанной пользователем или стандартной.

Пример,

Clrscr - вызов стандартной процедуры модуля CRT

Input(a,b) – вызов процедуры пользователя

Оператор безусловного перехода (go to) применяется в случаях, когда после выполнения какого- либо оператора нужно выполнить не следующий по порядку, а какой- то помеченный меткой оператор.

Зам! Метка должна быть описана!

Пример,

Ptogram _;

label m1,m2;

begin

goto m1;

m1: <операторы>;

end.

Использование этого оператора не рекомендуется, так как оно способствует созданию малопонятных сложных при отладке программ.

Структурные операторы представляют собой конструкции, построенные из других операторов по строго определенным правилам. Все структурные операторы можно разделить на составные, условные, циклические.

Дома: построить диаграмму, отображающую связь операторов.

Операторы

Простые Структурные

Оператор присваивания

Go to

Пустой

Оператор вызова процедуры

Условные(if, case)

Циклические(for, while, repeat)

Составные(begin…end)