Составление и отладка линейных программ на языке Turbo Pascal

1.

«Составление и отладка линейных
программ на языке Turbo Pascal»

2.

Program xxx;
Label; - раздел меток
Const; - раздел констант
Type; - раздел типов
Var; - раздел переменных
Procedure
Function
Begin
…
End.

3.

4.

Тип
Диапазон значений
Shorting
-128..127
integer
-32768..32767
longint
-2147483648..2147483647
byte
0..255
word
0..65535

5.

Тип
Диапазон значений
real
2.9E-39..1.7E38
single
1.5E-45..3.4E38
double
5.0E-324..1.7E308
extended
3.4E-4932..1.1E4932
comp
-9.2E18..9.2E18

6.

Строка переменной длины – string
Логический – boolean
Символьный – char

7.

Запись
функции
Назначение
Пример
использования
Результат
Abs(X)
Модуль числа, |X|
Abs(-3.5)
3.5
Sin(X)
Синус угла (радианы)
Sin(pi)
0
Cos(X)
Косинус угла
(радианы)
Cos(pi)
-1
Arctan(X)
Арктангенс числа
Arctan(0)
0
Int(X)
Целая часть числа X
Int(3.5)
3
Sqrt(X)
Квадратный корень X
Sqrt(25)
5
Random(X)
«Случайное» число
Random(10)
Число в [0;10]
Exp(X)
Показательная
функция
Exp(1)
2.718281828…
Sqr(X)
Квадрат числа X
Sqr(2)
4

8.

Запись
функции
Назначение
Пример
использования
Результат
Ln(X)
Натуральный логарифм
Ln(2.718281828)
1.0
Pi
Число пи
Pi
3.141592…
Round(X)
Округление числа X
Round(3.2)
Round(3.7)
3
4
Frac(X)
Дробная часть числа X
Frac(3.5)
0.5
Trunc(X)
Отбрасывание дробной
части X
Trunc(3.2)
3
Odd(X)
Проверка нечетности
числа X
Odd(3)
True
N Div M
Целочисленное деление
N на M
10 Div 3
3
N Mod M
Остаток от деления N
на M
10 Mod 3
1

9.

Запись
процедуры
Назначение
Пример
использования
Результат
Увеличение X на
величину Y
Inc(5,2)
7
Inc(X)
Увеличение X на 1
Inc(5)
6
Dec(X,Y)
Уменьшение X на
величину Y
Dec(5,2)
3
Уменьшение X на 1
Dec(5)
4
Inc(X,Y)
Частный
случай
Частный
случай
Dec(X)

10.

Read (a1,…,an)
вводит последовательно в
строку.
Readln (a1,…,an) вводит каждый
следующий элемент с
новой строки.
Readln
переход на новую строку.

11.

Write (a1,…,an)
выводит последовательно
в строку.
Writeln (a1,…,an) выводит каждый
следующий элемент с
новой строки.
Writeln
переход на новую строку.

12.

:=
Пример:
p:=sin(a+b)
p:=random(b-a+1)+a – случайное число в
пределах от a до b.

13.

Задача № 1:
Вывести на экран приветствие «Добрый день!»
Program primer1;
begin
Writeln(‘Добрый день!’);
end.

14.

Задача № 2:
Вычислить периметр прямоугольника со сторонами a
и b.
Program primer2;
Uses crt;
Var a,b,p:real;
Begin
clrscr;
Writeln(‘Введите длины сторон прямоугольника’);
Readln(a,b);
P:=(a+b)*2;
Write(‘p=’,p);
End.

15.

Как записывается оператор вывода?
Как записывается оператор ввода?
Как записывается оператор присваивания?
Чем заканчивается программа?
Какая функция используется при записи
выражения: y=x2+3x-7?
Записать на языке Turbo Pascal выражения:
y=5x5-10x+2
z=14x4-5x3+11x-17
Какие операции можно применить к переменным
целого типа?