Язык программирования Паскаль был разработан Н. Виртом в 1968 -1970 годах. Турбо Паскаль появился на рынке программных продуктов в 1984 году. Турбо Паскаль состоит из языка программирования и среды, которая обеспечивает удобную и производительную работу.
Структура программы на Паскале
Program <Имя программы>;
Label < разделописания меток >;
Const < раздел описания констант >;
Type < раздел описания типов >;
Var < раздел описания переменных >;
Procedure (Function)< раздел описания подпрограмм >;
Begin
< раздел операторов >
End.
Пример: Написать программу, по которой вычисляется произведение двух целых чисел.
Program Ex1;
Var a,b,rez:integer;
Begin
Writeln(‘Введите числа’);
Readln(a,b);
rez:=a*b;
Writeln(‘Их произведение равно’,rez);
Readln;
End.
Ввод данных с клавиатуры производится путем обращения к стандартной процедуре:
Readln(x1,x2,…,xn);
Значения х1,х2,…,хn набираются через пробел на клавиатуре и высвечиваются на экране, затем нажимаем Enter.
Вывод данных на экран производится путем обращения к стандартной процедуре:
|
|
Writeln (x1,x2,…,xn);
Примеры:
Значения переменной I | Оператор вывода данных | Результат на экране |
Writeln(I); | ||
Writeln(I); | ||
Writeln(I,I,I); | ||
Writeln(I:6); | - - - 134 | |
Writeln(I:10); | - - - - - - - - - 1 | |
Writeln(I+I:7); | - - - - 624 | |
Writeln(‘Значение I равно_’,I); | Значение I равно_81 |
Символом “-“ обозначены пробелы.
Стандартные математические функции Паскаля представлены в следующей таблице:
(Для типов величин использованы обозначения: I – целый, R – вещественный)
Обращение | Тип аргумента | Тип рез-та | Функция |
abs (x) | I,R | I,R | Модуль аргумента |
arctan (x) | I,R | R | Арктангенс(радианы) |
cos (x) | I,R | R | Косинус(х в радианах) |
exp (x) | I,R | R | ех – экспонента |
frac (x) | I,R | R | Дробная часть х |
int (x) | I,R | R | Целая часть х |
ln (x) | I,R | R | Натуральный логарифм |
random | R | Псевдослучайное число в интервале [0,1] | |
random (x) | I | I | Псевдослучайное число в интервале [0,х] |
round (x) | R | I | Округление до ближайшего целого |
sin (x) | I,R | R | Синус(х – в радианах) |
sqr (x) | I,R | R | Квадрат х |
sqrt (x) | I,R | I,R | Корень квадратный |
trunk (x) | R | R | Ближайшее целое, не превышающее х по модулю |
Задания:
1. Написать программу вычисления суммы четырех целых чисел.
2. Написать программу для вычисления значения выражения:
(a+3(d-12))(c-5k). Значения a, c, d, k – вводятся с клавиатуры.
3. Выведите на экран в одной строке свою фамилию, имя и отчество, в следующей – дату рождения.
4. Написать программу вычисления площади прямоугольного треугольника с катетами a и b. Результат вывести следующим образом: «Для значений катетов 4 и 6 площадь треугольника равна 12».
5. Написать программу вычисления периметра прямоугольника, ширина и длина вводятся с клавиатуры.
|
|
6. Дано х. Вычислить значение выражения:
у=15х2 + 8х – 9.
7. Записать математические выражения в виде арифметических выражений на Паскале.
а) б)
в)
3.2 Целый тип данных
Переменные целого типа описываются посредством идентификатора Integer.
Они могут принимать значения от -32768 до 32767.
Переменные целого типа описываются посредством идентификатора Longint, если переменные принимают значения от -2 147 483 648 до 2 147 483 647.
При делении целого числа на целое не всегда получается целое число, но используя операции div и mod – результаты будут целого типа.
div – целая часть от деления;
mod – остаток от деления.
Пример:19 div 4 =4 (остаток=3, отбрасывается)
19 mod 4 =3
-21 div 4 = -5
-21 mod 4= -1
-7 mod (-4)=-3
Задания:
1. Какими будут результаты вычислений?
a) 875 div 100 + (875 mod 100) div 10 + 875 mod 10
b) 391 div 100 + (391 mod 100) div 10 + 391 mod 10
2. Найти сумму цифр заданного трехзначного числа а.