Разновидности данных целого типа даны в таблице 1.1.
Таблица 1.1
Целый тип
Диапазон значений
Размер памяти
Shortint
-128 … 127
1 байт
Integer
-32768 ... 32767
2 байта
Longint
-2147483648 ...2147483647
4 байта
Byte
0 ... 255
1 байт
Word
0 ... 65535
2 байта
Для вывода поясняющего текста (подсказок оператору ЭВМ) можно использовать операторы типа:
Write('Сообщение о вводе данных');
Writeln('Сообщение о выводе результатов');
Для ввода данных можно использовать операторы типа:
Read(A,B,C);
Readln(S1);
При вводе числа разделяются пробелом, символы вводятся без разделителя.
Для вывода результатов можно использовать операторы типа:
Write(Result:7:2);
где «7» – общее количество разрядов результата (включая знак числа, целую часть, десятичную точку и дробную часть), «2» – количество разрядов после десятичной точки.
Writeln(Result:7:2);
Арифметические выражения на языке Turbo Pascal:
A + B – сложение вещественных или целых чисел,
A - B – вычитание вещественных или целых чисел,
A * B – умножение вещественных или целых чисел,
A / B – деление вещественных чисел,
A div B – деление целых чисел (целая часть частного).
Порядок выполнения действий определяется рангом (старшинством) операций или скобками по правилам алгебры.
Оператор присваивания выполняется следующим образом:
а) вычисляется значение выражения, записанного в правой части оператора;
б) полученное значение присваивается переменной, имя которой записано в левой части оператора;
<переменная> : = <арифметическое_выражение> или <константа>;
например, Result : = (A + B) / X;
B1 : = true;
Пример подготовки и выполнения программы
После загрузки среды Turbo Pascal нажмите F10 и выберите File\ New для создания нового окна. После этого можно приступить к набору текста программы, нажимая Enter в конце каждой строки. Например:
{Программа вычисления суммы двух чисел}
program First_Program;
uses crt; {USES-раздел объявления внешних модулей}
{СRT-модуль работы с экраном}
var
A,B : Real; {вводимые данные}
S: Real; {сумма чисел }
begin
clrscr; {вызов процедуры очистки экрана}
Writeln (' Программа вычисления суммы двух чисел ');
Writeln ('---------------------------------');
Write ('Введите два любых числа : ');
Readln (A,B);
S:=a+b;
Writeln(‘S=’,S:8:2);
Writeln(‘Нажмите ENTER для продолжения работы’);
Readln {ожидание нажатия клавиши Enter}
end.
Для сохранения программы выберите команду Save из меню File (или F2).
Для компиляции программы нажать F9.
Turbo Pascal компилирует программу, переводя ее с языка Pascal (который можно читать) на машинный код для микропроцессора (который может выполнить ваш компьютер).
При наличии ошибки см. п. 1.8.
Для выполнения программы следует выбрать Run/Run в главном меню (или нажать Ctrl-F9).
Пример работы описанной выше программы
1. На экран выводятся сообщения, которые заданы в операторах Writeln вашей программы:
«Программа вычисления суммы двух чисел»
«Введите два любых числа:»
2. Ввод двух любых чисел с пробелом между ними.
3. На экран выводится следующее сообщение:
S= ,
а за ним – вычисленная сумма двух введенных чисел.
4. В следующей строке выводится сообщение "Нажмите Enter для продолжения работы". Программа будет ждать нажатия клавиши Enter.
Чтобы посмотреть результаты работы программы, выберите Window/User Screen (или нажмите Alt+F5). Если во время выполнения программы произошла ошибка, то на экране появится сообщение, которое выглядит следующим образом:
Run-time error <errnum> at <segment>:<offset> ,
где <errnum> – это соответствующий код ошибки,
<segment>:<offset> – это адрес в памяти, где произошла ошибка. Вы окажетесь в точке расположения ошибки в своей программе с описательным сообщением об ошибке. Пока сообщение находится в строке статуса редактора, можно нажать F1 для получения справочной информации по конкретной ошибке. Нажатие любой другой клавиши приводит к исчезновению сообщения об ошибке.
