ОПЕРАЦИИ И СТАНДАРТНЫЕ ФУНКЦИИ языка PASCAL

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

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

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

Например: 11 div 5 = 2 10 div 3 = 3 2 div 3 = div 4 = div -5 = div 5 = div -5 = 3 10 mod 5 = 0 11 mod 5 = 1 10 mod 3 = 1 14 mod 5 = 4 17 mod - 5 = mod 5 = mod -5 = -2

Взаимосвязь между операциями div и mod Аргументы операций div и mod целые числа. Для а>0 и b>0 справедливо: A mod b = a – (a div b)*b (a div b)*b + (a mod b) = a Обратите внимание операцию mod можно использовать, чтобы узнать, кратно ли целое а целому b. А именно, а кратно b тогда и только тогда, когда а mod b = 0

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

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

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

Арифметические функции Sqr (x) __ x (квадратный корень) Sqrt (x) x 2 (квадрат числа) Abs (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 ('модуль=', с);

Тригонометрические функции Sin (x) Cos (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;

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

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

Преобразование типов Round(x) Перевод дробного числа в целое с отбрасыванием дробной части Trunc(x) Перевод дробного числа в целое с округлением

Примеры преобразования типов a1:=Round(2.34); a2:=Trunc(2.34); b1:=Round(8.51); b2:=Trunc(8.51); c1:=Round(-3.7); a1 = 2 a2 = 2 b1 = 9 b2 = 8 c1 = -4

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

Примеры использования DIV и MOD : Операции DIV и MOD часто используются для анализа чисел, например, для получения цифр, из которых состоит число. Задача: Ввести с клавиатуры какое-нибудь трехзначное число. Определить сумму его цифр и вывести эти цифры в обратном порядке.

Пусть переменная а содержит значение заданного числа. Цифры числа а обозначим так: i - количество сотен; j – количество десятков; k - количество единиц; s – сумма этих цифр. Program MyNamber; Uses Crt; Var a, i, j, k, s: integer; Begin clrscr; Writeln ( Задайте 3-х значное число); Readln (a); i:=a div 100; {количество сотен} j:=a div 10 mod 10; {десятков} k:=a mod 10; {количество единиц} s:=i+j+k; Writeln (Сумма цифр числа,a,=,s ); Writeln (k, j, i); Readln; End.

Стандартные функции Функция ПаскаляМатематическая запись Название Abs(x)|Х||Х| Абсолютная величина числа Х (модуль) Sqr(x)Х2Х2 Возведение числа в квадрат Exp(x)exex Экспонента Sqrt (x) x Вычисление квадратного корня Exp(b*ln(a)) abab Возведение числа в степень Round (x) Округляет до ближайшего целого числа Trunc (x) Отсекает дробную часть Sin(x)sinx Вычисление синуса Cos(x)сosx Вычисление косинуса

Примеры Математическая запись Запись на языке Pascal Sqrt(15)+(abs(-n)+exp(15*ln(3)))/exp(3) sqrt(a*b)/abs(c)+exp(4*ln(d)) sin(60*pi/180)/cos(60*pi/180)*pi Десятичная запятая в Pascal обозначается точкой

Задания:

1. Запишите выражения на языке Pascal и вычислите их с помощью ABC Pascal

Ответы 1.1, , ,68 4.2,06 5.1,10 6.2,16 7.3,05 8.0,10

2.Дано трёхзначное число. В нём зачеркнули первую слева цифру и приписали её справа. Вывести полученное число.(Например, ) 3.Дано трёхзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа. (Например, )