Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Лекция 03 Создание приложенийl (1540916)

.pdf
Скачиваний:
6
Добавлен:
09.03.2016
Размер:
2.96 Mб
Скачать

Стандартные функции

Функция

Запись

Тип

Тип

математическая

на Pascal

аргумента

результата

 

|x|

Abs(x)

Целый

Целый

 

 

 

 

 

 

 

 

 

 

 

 

Вещественный

 

 

 

Вещественный

 

arctg(x)

Arctan(x)

Вещественный

Вещественный

 

ex

Exp(x)

Вещественный

Вещественный

 

sin(x)

Sin(x)

Вещественный

Вещественный

 

cos(x)

Cos(x)

Вещественный

Вещественный

 

tg(x)

Tan(x)

Вещественный

Вещественный

 

Ln(x)

Ln(x)

Вещественный

Вещественный

целая часть

Int(x)

Вещественный

Вещественный

 

числа

 

 

 

 

 

 

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

frac(x)

Вещественный

Вещественный

 

 

числа

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Стандартные функции

Функция

Запись

Тип

Тип

математическая

на Pascal

аргумента

результата

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Sqrt(x)

Вещественный

Вещественный

 

 

x

 

 

 

 

 

 

 

 

 

 

x2

Sqr(x)

Целый

Совпадает с

 

 

Вещественный

типом аргумента.

 

 

 

 

 

 

 

XY

power(x,y)

Целый

Совпадает с

 

 

Вещественный

типом аргумента.

 

 

 

 

 

Округление до

Round (x)

Вещественный

Целый

ближайшего

 

 

 

 

 

 

 

целого

 

 

 

 

 

 

Ближайшее

Trunc (x)

Вещественный

Целый

целое, не

 

 

 

 

 

 

превышающее

 

 

 

 

 

 

Х по модулю

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Арифметическое выражение

c ab

C:=exp(b*ln(a));

23

Арифметическое выражение

a y3|x| cos 3 ( y 3)

A:=exp((exp(1./3*ln(abs(x)))*ln(y)) +

exp(3*ln(cos(y-3)));

24

Арифметическое выражение

a 2( y x ) (3x ) y

A := exp(exp(x*ln(y))*ln(2)) + exp(y*ln(exp(x*ln(3))));

25

Арифметическое выражение

 

 

 

 

 

)

 

y * (arctg(z)

b

 

 

 

 

6

 

1

 

 

 

 

 

 

 

 

| x |

 

 

 

 

 

y2 1

 

 

B := y*(atan(z) - pi/6)/(abs(x) +

1/(y*y+1));

26

Арифметическое выражение

 

 

 

 

 

 

 

 

 

| x y | *(1

sin 2 (x)

)

 

 

 

 

 

b

 

 

x y

 

 

 

 

 

 

 

e|x y|

x

 

 

 

 

 

 

 

 

 

2

 

 

 

B:=abs(x-y)*(1+sin(x)*sin(x)/(x+y))/

(exp(abs(x-y)+x/2));

27

Процедуры ввода данных

Read (элемент1, элемент2, …); ReadLn (элемент1, элемент2, …);

Read (a, b, c, i, j, k);

ReadLn (x, y, z);

Процедуры вывода данных

Write (элемент1, элемент2, …); WriteLn (элемент1, элемент2, …);

Write (a, b, c, i, j, k); WriteLn (x, y, z);

WriteLn (x, ' ', y, ' ', z); - печать с пробелами

Примеры вывода данных

X:=2; Y:=4; z:= 6;

Процедура вывода

Результат

WriteLn (x, y, z);

246

WriteLn (x, ' ', y, ' ', z);

2 4 6

WriteLn (' Привет всем ');

Привет всем