Стандартні типи даних

Табл1.

Integer	Цілі: -32768…32768	2 байти
Word	Натуральні 0..65535	2 байт
byte	Натулальні 0…255	1 байт
longing	цілі-2147483648…214748364	4 байти
Real	Дійсні 2,9·10-39…1,7·1038	6 байтів
string	Текст невизначеної довжини	До 256 байтів
boolean	логічна	1 біт
array	Масив даних

Стандартні функції Turbo Pascal

Табл2.

Turbo Pascal	Коментарі, матем. форма функції		Turbo Pascal	Коментарі, матем. форма
Sin(x)	Sin x- аргумент в		Round(x)	Округлить да цілих
Cos(x)	Cos x - радіанах		Frac(x)	Дробна частина Х
Arctan(x)	Arctg x -		Ln(x)	Ln X
Abs(x)	| x| -		Trun(x)	Ціла частина Х
Sqrt(x)	√x		Int(x)	Обнулить дробну частину
Sqr(x)	x2 -		Random	Випадкове (0;1)
Exp(x)	eX -		Random(n)	Випадк.ціле [0;n]

Якщо в виразі присутня математична функція, яку не має Turbo Pascal, треба виконати певні перетворення виразу. Розглянемо приклади.

1. sin40=sin(40∙/180) sin(40*pi/180);

2. sin(x)/cos(x);

3. ln(x)/ln(2);

4. exp(x*ln(a));

5.  exp(1/n*ln(a));

6. 

 arctan(sqrt(1-sqr(x))/x);

На мові Turbo Pascal існують крім звичайних математичних операцій ще операції : поділити націло число k на n – k div n , визначити залишок від цілочисельного ділення k на n – k mod n . За допомогою цих команд не складно виділити

• цифру, що визначає кількість сотень в числі – як результат цілочисельного ділення всього числа на 100;

• цифру, що визначає кількість одиниць в числі - як залишок цілочисельного ділення всього числа на 10;

• кількість десятків можна визначити як послідовність 2-х операцій: визначити результат цілочисельного ділення всього числа на 10, а потім визначити залишок від цілочисельного ділення результату ще на 10.

program cyfry;

uses crt;

var a, b, c, n, summa : integer;

begin

clrscr; gotoxy(5,10);

write (‘Ввести целое 3-хзначное число:’); readln (n);

a:= n div 100; b:= (n div 10) mod 10; c:= n mod 10;

summa:= a+b+c;

gotoxy(5,17); writeln(’Сумма цифр =’, summa);

end.

Приклад 2. Для будь-якого 3-хзначного числа визначити суму цифр, що входять до його складу