Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Программирование на Pascal / Delphi / Лекции по Turbo Pascal [12].pdf
Скачиваний:
108
Добавлен:
02.05.2014
Размер:
1.06 Mб
Скачать

Одесский колледж компьютерных технологий “СЕРВЕР”

Пример 7:

Сделайте умышленную ошибку в каком-либо операторе writeln вашей программы. (например не поставьте символ “;” в конце оператора)

Запустите программу.

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

Комментарии

Комментарии – это пояснения к тексту программы. В Паскале комментарии записываются в фигурных скобках “{}”. Т. е. все что в них находится - просто пропускается при выполнении программы.

Запись формул

Оператор writeln можно использовать для выполнения арифметических операций с числами. Числа в выражении связываются знаками операций. Эти знаки имеют такие значения:

Знак операции

Значение

*

Умножение

/

Деление

div

деление без остатка (цело-

 

численное деление)

mod

Остаток от деления (резуль-

 

тат – целое число )

+

Сложение

-

Вычитание

( )

Скобки

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

тичная точка, например: 5.1

0.25 -1.09

Начинающие программисты иногда делают распространённую ошибку, забывая ставить знак «*» перед скобкой. Например, если вы удалите знак «*» из выражения 3*(6.72+9.81) в своей программе и запустите её, Паскаль выдаст ошибку.

Иногда начинающие программисты делают ошибку забывая ставить скобки и нарушая при этом порядок действий. В этом случае Паскаль, есте-

14

Одесский колледж компьютерных технологий “СЕРВЕР”

ственно, не выдаёт сообщения об ошибке, но рассчитывает значение совершенно иного выражения.

Мы пока рассматривали примеры использования оператора writeln для простейших расчётов. Для выполнения более сложных расчетов в языке Паскаль существуют различные функции. Приведём наиболее часто используемые из них:

Математическая функция

Значение функции

 

 

Abs(выражение)

модуль выражения

Sin (угол)

синус угла

Cos (угол)

косинус угла

Arctan (угол)

арктангенс угла

Exp (выражение)

функция e в степени <выражение>

Ln (выражение)

натуральный логарифм выражения

Pi

Число пи

 

Pi=3.1415926535897932385

Frac (выражение)

дробная часть числа

Int (выражение)

целая часть (возвращает значение

 

вещественного типа)

Sqr (выражение)

квадрат выражения

Sqrt (выражение)

квадратный корень из выражения

Примечание: все тригонометрические функции используют радианную меру угла (1рад=180π ).

Обратите внимание: в Паскале нет операции возведения в степень (кроме 2-й). Её можно выразить через экспоненту и логарифм:

a b = exp(b * ln(a))

Печать списка и текстов.

Оператор writeln можно использовать и для вывода любого текста, например, какого–либо сообщения.

Текст, который указывается в операторе writeln, должен быть заключён в кавычки.

Например: Writeln( ‘Внимание! Запуск программы’) Writeln( ‘Программа завершена! ’)

15

Одесский колледж компьютерных технологий “СЕРВЕР”

В конце текста или арифметического выражения, записанного в операторе writeln, может следовать другое арифметическое выражение или текст. Разделителем служит символ “ , ”.

Например, оператор

Writeln(‘Сумма чисел 235 и 14 равна ’ , 235+14 )

выведет на экран следующее:

Сумма чисел 235 и 14 равна 249

Стандартные модули.

Turbo Pascal 7.0 имеет большое количество стандартных подпрограмм и данных, объединённых в несколько так называемых "стандартных модулей". Вот их перечень:

(*)

System - основная библиотека;

 

Strings - работа с ASCIIZ-строками;

(*)

Crt

- работа с клавиатурой и экраном (в текстовом режиме);

 

Graph

- графическая библиотека;

(*) Dos

- использование возможностей DOS;

 

WinDos - использование возможностей DOS и ASCIIZ-строк;

(*)Overlay - организация оверлейных структур;

(*)Printer - работа с принтером;

Turbo3 - совмещение с программами Turbo Pascal 3.0; Graph3 - совмещение с графикой Turbo Pascal 3.0;

Модули отмеченные (*) содержатся в файле Turbo.tpl. Остальные - в отдельных файлах с такими (как модули) именами с расширением tpu. Для того, что бы использовать процедуры и функции, входящие в этот модуль, необходимо его сначала "подключить" следующим образом: после заголовка программы перед разделом описаний нужно написать

Uses <имя модуля>;

Так подключаются и все модули, кроме модуля System. Модуль System всегда подключён по умолчанию. Именно в нём находятся те процедуры и функции, которые составляют ядро системы программирования Turbo Pascal и которые вы до сих пор учили. Остальные модули составляют ту часть процедур и функций, которую мы называем "расширением" стандартного Паскаля.

Модуль CRT.

16

Одесский колледж компьютерных технологий “СЕРВЕР”

Каждый выводимый элемент (текст, результат вычислений и т.д.) можно раскрасить в свой цвет. Для этого, нам нужно подключить модуль CRT (использовать uses crt; в начале программы).

Модуль CRT (Cathod ray tube - электронно-лучевая трубка) один из наиболее часто используемых. Он содержит процедуры обслуживания процессов вывода информации на экран, ввода с клавиатуры, а также процедуры и функции вывода звуковых сигналов, работы с окнами на экране и вывода цветных текстовых строк на экран.

При работе с экраном через модуль CRT весь экран разбивается на отдельные строки, а каждая строка - на отдельные позиции, в каждую из которых можно поместить один символ (в том числе и пробел). Таким образом весь экран разбивается на отдельные неделимые прямоугольные элементы. Для каждого элемента можно задать цвет фона и цвет символа. Кроме того, в случае необходимости символ можно сделать мерцающим.

Схематически это можно представить в следующем виде:

X

Y

Ось X направлена вправо, ось Y вниз. В текстовом режиме (модуль CRT) верхний левый угол имеет координаты (1,1), где первая единица – это номер позиции, а вторая – это номер строки.

Процедура TextMode(t) задаёт номер текстового режима. Возможные значения переменной t:

T

Назначение

0

40х25 ч/б для цветного адаптера

1

40х25 цветной

2

80х25 ч/б для цветного адаптера

3

80х25 цветной

256

EGA/VGA 43 и 50 строк

Процедуры управления цветом. GotoXY(x,y) Установка курсора в позицию x и строку y.

TextBackGround(color) Задаёт цвет фона. Color может принимать значение только 0-7.

TextColor(color) Задаёт цвет символа (от 0 до 15).

17