ОПЕРАЦИИ И СТАНДАРТНЫЕ ФУНКЦИИ Turbo Pascal 7.0

Темы: Операции Функции Приоритетность

Операции: Арифметические операции Операции отношения Булевские (логические) операции Поразрядные логические и сдвиговые операции Операции над множествами

Арифметические операции Сложение + - * / Вычитание Деление Умножение

Целочисленное деление (деление с остатком) div mod Неполное частное (целая часть) Остаток от деления

Примеры целочисленного деления 23 div 5 = 4 16 div 4 = 4 5 div 8 = 0 37 div 10 = 3 23 mod 5 = 3 16 mod 4 = 0 5 mod 8 = 5 37 mod 10 = 7

Определить кол-во оставшихся слив, если их делили на 5 человек write (Кол-во слив = '); readln (a); b:= a mod 5; writeln(Осталось,b, слив);

Определить, сколько попугаев поместится на удаве (длина попугая - a, длина удава - b) write ('a='); readln (a); write ('b='); readln (b); c:= b div a; writeln ('Поместится', с, попугаев');

Операции отношения Не равно <> Меньше = Равно Больше < > <=<= >=>= Меньше или равно Больше или равно

Функции Арифметические функции Тригонометрические функции Экспонента и логарифм Преобразование типов Случайные числа

Арифметические функции S q r (x) __ x (квадратный корень) S q r t (x) x 2 (квадрат числа) A b s (x) |x| (модуль числа)

Вычислить гипотенузу прямоугольного треугольника (длина катетов - a и b) write ('a='); readln (a); write ('b='); readln (b); c:= sqrt (sqr(a) + sqr(b) ); writeln ('c=', с:5:2);

Вычислить модуль разности чисел a и b) write ('a='); readln (a); write ('b='); readln (b); c:= abs (a - b); writeln ('модуль=', с);

Тригонометрические функции S i n (x) C o s (x) sin x ArcTan(x) в радианах cos x arctg x

Вычислить синус, косинус, тангенс и котангенс угла 30 a:=Pi/180*30; s:=sin(a); c:=cos(a); t:=s/c; ct:=c/s;

Экспонента и логарифм E x p (x) ln x (натуральный логарифм ) L n (x) e x (экспонента числа, e ) E x p ( b * L n ( a ) ) a b

Примеры вычисления степени (x-3) 7 2 x 3 __ x exp(7 * ln(x-3)) exp(x * ln(2)) exp(1/3 * ln(x))

Генерация случайных чисел Random Формирование случайного дробного числа из диапазона от 0 до 1 Randomize; Установка датчика случайных чисел в исходное состояние

Случайные целые числа Random(N) Формирование случайного целого числа из диапазона от 0 до N-1 натуральное

Примеры получения целых случайных чисел a:=Random(3); x:=Random(10); y:=Random(5)+3; c:=Random(8)-5; 0,1,2 0,1,2,…,9 3,4,5,…,7 -5,-4,…,2

Смоделировать 5-кратное бросание игрального кубика randomize; for i=1 to 5 do begin x:=random(6)+1; writeln(i, бросок: ',x,очков); end;

Смоделировать 10-кратное бросание монеты randomize; for i=1 to 10 do if random(2)=0 then writeln(орел) else writeln(решка);

Приоритетность выполнения действий 1. Выражение в скобках 2. Функции 3. Знак числа (+,-), 4.*, /, div, mod, and, shl, shr 5.+, -, or, xor 6.=, <>,, =, in