Действительный (вещественный) тип данных в Turbo Pascal. Данные целого типа. Управляющие конструкции в Turbo Pascal.

Действительный (вещественный) тип данных в Turbo Pascal.

Данные действительного (вещественного) типа необходимы тогда,

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

тельный тип данных используется для описания действительных пе-

ременных, т.е. таких переменных, значением которых может быть

действительное или целое число.

В Turbo Pascal константа действительного типа может быть предс-

тавлена в двух видах:

1) Числом с фиксированной точкой.

2) Числом с плавающей точкой.

Число с фиксированной точкой изображается десятичным числом с

дробной частью (она может быть и нулевой). Дробная часть отделя-

ется от целой с помощью точки. Например: 19.56; 0.05; -376.18;

Следует обратить внимание на то, что в записи действительных чи-

сел вместо десятичной запятой, как принято в математике, исполь-

зуется ДЕСЯТИЧНАЯ ТОЧКА!

Очень большие и очень маленькие числа в математике принято запи-

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

цифр на степень числа 10. В Turbo Pascal такая запись называется

записью числа с плавающей точкой. Число с плавающей точкой запи-

сывается в виде: mEp, где m - мантисса числа, p - порядок числа.

1.3653*10 8

1.3653E+8

6.63*10 -34

6.63E-34

-1.6*10 -19

-1.6E-19

3*10 8

3E8

т.е. описание переменной имеет тип Real.

Пример: var x,y,z:real;

Однако в TPascal есть ещё 5 стандартных действительных типов.

Они используются тогда, когда диапазон изменения переменной

больше, чем у типа Real.

Real

-2.9E-39. 1.7E38

11-12

Single

-1.5E-45. 3.4E38

7-8

Double

-5.0E-324. 3.4E308

15-16

Extended

-3.4E-4932. 1.1E4932

19-20

умножение *, деление /. Одно из двух данных при этом может быть

целого типа, но результат операции будет действительным числом.

К действительным числам можно применять встроенные функции:

sin(x); cos(x); exp(x); ln(x); sqr(x); sqrt(x); arctan(x);

abs(x); pi=3.14159. ; int(x) - целая часть числа; frac(x) -

дробная часть числа; random(x) - случайное число (от 0 до 1).

Вывод действительных данных возможен с форматом и без формата.

Если формат отсутствует, то число выводится с плавающей точкой с

мантиссой и порядком, при этом на изображение числа отводится 17

позиций. В целой части мантиссы присутствует только 1 значащая

цифра, в дробной части 10 цифр, а на порядок с учетом знака от-

водится 3 позиции. Пример: -3.2648375386Е-01.

Для наглядности выводимых результатов предусмотрены форматы.

Формат указывается в операторе вывода write вслед за выводимым

данным через двоеточие: R:m:n, где R - выводимое данное действи-

тельного типа, m - общее поле выводимого числа (включая знак чис-

ла, целую часть, точку и дробную часть), n - поле дробной части.

В качестве m и n могут быть целые константы, переменные, выраже-

ния. Чаще всего это целые числа. При использовании форматов число

выводится с фиксированной точкой. Пример: Для вывода числа

R:=-0.18 достаточно указать в операторе write(R:5:2);

Если формат указан больше, чем необходимо, то перед целой частью

располагаются избыточные пробелы, а после дробной части - нули.

Данные целого типа в языке Turbo Pascal.

Данные целого типа используются в тех случаях, когда величину

нужно представить абсолютно точно, например, число предметов.

К данным целого типа относятся константы и переменные.

Константа целого типа-это десятичное число, записанное без точки.

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

Знак плюс можно не указывать. Пример: 7, -140, +357, 0, 999.

Константы могут быть обозначены именем. В этом случае они задают-

ся в разделе const. Пример: const k=15; p1=-46; p2=46;

Переменная целого типа принимает значение целого десятичного чис-

ла. Описание переменной обозначается integer.

Пример: var a,b:integer; b1,b2:integer;

Данные целого типа (integer) принимают значения от -32768 до

+32767. В памяти машины эти значения представлены точно.

В разделе операторов переменные целого типа должны принимать зна-

чения целых десятичных чисел. Пример: a:=25; S:=0;

Всего в Turbo Pascal 5 встроенных данных целого типа:

shortint (короткое целое)

-128. 128

integer (целое)

-32768. +32767

longint (длинное целое)

-2147483648. +2147483647

byte (длиной в байт)

0. 255

word (длиной в слово)

0. 65535

пользуется тип longint (длинное целое), иначе будут ошибки в вы-

Над данными целого типа можно выполнять следующие арифметические

операции: сложение + , вычитание - , умножение * , деление div

с отбрасыванием дробной части (получение целого частного при де-

лении целого на целое). Пример: -25 div -3 (результат 8).

К данным целого типа применяется также операция mod - получение

целого остатка при делении целого на целое.

Пример: -25 mod -3 (результат -1).

Управляющие конструкции в Turbo Pascal

1. Условный оператор IF. THEN. ELSE (Если. то. иначе).

Позволяет организовать разветвление в алгоритме программы.

Условный оператор записываеся следующим образом:

IF Логическое условие THEN Оператор 1

ELSE Оператор 2;

Если выполняется логическое условие (чаще всего это математи-

ческое равенство или неравенство, например: N=5; X>0; Y>=A;

Z<>K;), то выполняется оператор 1. В противном случае выполня-

ется оператор 2.

Пример программы с условным оператором:

writeln('Знаете ли Вы год основания Москвы?');

write('Введите год основания Москвы: k=');

if k=1147 then writeln('Вы совершенно правы!')

else writeln('Вы ошиблись!');

writeln('Для выхода из програмы введите число 1.');

2. Оператор цикла с параметром FOR. TO. DO.

Для организации циклического алгоритма часто используется

оператор цикла с параметром: for i:=A to B do S,

где i-некоторая переменная (параметр или счетчик цикла) типа

integer, A и B (B>A) выражения со значением типа integer,

S-оператор (тело цикла). Если A>B, то оператор S не будет вы-

полнен ни разу (когда параметр i возрастает). Если параметр i

возрастает, то между границами его значений A и B ставится

слово TO, если же i убывает, то ставится слово DOWNTO и опера-

тор цикла выполняется при A>B.

Пример программы с оператором цикла с параметром:

var i,n:integer; s,q:real;

writeln('Вычислите сумму первых n членов ряда:');

write('Введите число членов суммы: n=');

for i:=1 to n do s:=s+1/(i*i);

writeln('Cумма первых n членов ряда равна: S=',s);

writeln('Для выхода из программы введите число 1.');

3. Оператор цикла с предварительным условием WHILE. DO.

WHILE (до тех пор, пока) и DO (выполнить) являются служебными

словами. Применение оператора цикла WHILE. DO в программе

осуществляется следующим образом:

while логическое выражение(условие) do

Операторы циклической части программы(тело цикла)

Если в циклической части программы стоит всего один оператор,

операторные скобки BEGIN - END можно не указывать, и оператор

цикла WHILE. DO имеет вид:

while логическое выражение(условие) do оператор.

В качестве логического выражения чаще всего используется мате-

матическое равенство или неравенство.

Оператор цикла WHILE. DO действует следующим образом. Каждый

раз предварительно проверяется значение логического выражения.

Пока оно истинно, выполняются операторы циклической части

программы. Как только значение логического выражения становит-

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

Пример программы с оператором цикла WHILE. DO:

writeln('Вычислите n-факториал: n!=1*2*3*. *n; 0!=1.');

writeln('Введите любое натуральное число n=0,1,2,3. n=');

writeln('n-факториал равен: n!=', p);

writeln('Для выхода из программы введите число 1.');

Оператор цикла REPEAT. UNTIL организует выполнение цикла,

состоящего из любого числа операторов, с неизвестным заранее

числом повторений. Тело цикла выполняется хотя бы один раз.

Выход из цикла осуществляется при истинности некоторого логи-

ческого выражения (условия). Структура этого оператора:

REPEAT <тело цикла> UNTIL <условие>, где <тело цикла> - после-

📎📎📎📎📎📎📎📎📎📎