ОПЕРАЦИИ И СТАНДАРТНЫЕ ФУНКЦИИ Turbo Pascal 7.0. Темы: Операции Функции Приоритетность. - презентация

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

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

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

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

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

6 Примеры целочисленного деления 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

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

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

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

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

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

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

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

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

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

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

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

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

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

20 Примеры получения целых случайных чисел 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

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

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

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