Программирование на языке Паскаль
УРОК 2
Вычисление математических выражений в ABC Pascal
Приоритет выполнения операций в ABC Pascal такой же, как и в математике.
Достаточно только научиться правильно записывать математические выражения на языке Pascal
Арифметические действия
Операция
Наименование
А+В
Сложение
А-В
Вычитание
А*В
Умножение
A/B
Деление (только для вещественного типа)
А div B
Вычисление целой части (неполного частного)
A mod B
Вычисление остатка
Вычисли:
10 div 3 18 mod 4
Примеры
Математическая запись
Запись на языке Pascal
37(25+87,5)-17(4,6+1,9)
37*(25+87.5)-17*(4.6+1.9)
a*b/c+d*d*d*d
( a +2* b-3*c)/(5*a+4)
( a+b)/(a-b)+a*b/3.14
Десятичная запятая в Pascal обозначается точкой
Стандартные функции
Функция Паскаля
Математическая запись
Abs(x)
Название
| Х |
Sqr(x)
Абсолютная величина числа Х (модуль)
Х 2
Exp(x)
Возведение числа в квадрат
e x
Sqrt (x)
Frac (x)
Экспонента
Вычисление квадратного корня
Round (x)
Вычисляет дробную часть числа
Trunc (x)
Округляет до ближайшего целого числа
Отсекает дробную часть
Определите результат:
Frac(16.68); Round(16.68); Trunc(16.68);
Стандартные функции
Функция Паскаля
Математическая запись
Sin(x)
Название
sinx
Cos(x)
Int(x)
Вычисление синуса
с osx
Ln(x)
Вычисление косинуса
[x]
Exp(y*ln(x))
Целая часть числа
Ln x
Вычисление натурального логарифма
х y
Random(x)
Возведение числа в степень
Pi
Возвращает случайное число в диапазоне от 0 до Х
Число π
Градусы в Pascal нужно перевести в радианы
=
30* pi/180
Математическая запись
Запись на языке Pascal
:= выражение ; Пример 1 : count : = 10 ; numberOfItems : = 999 ; istance : = 780.8 ; Пример 2 : speedOfCar : = 65; timeOfTrip : = 3.5; distanceOfTrip : = speedOfCar * timeOfTrip; " width="640"
Операторы ЯП Pascal ABC
Оператор присваивания
имя переменной := выражение ;
Пример 1 :
count : = 10 ; numberOfItems : = 999 ;
istance : = 780.8 ;
Пример 2 :
speedOfCar : = 65; timeOfTrip : = 3.5;
distanceOfTrip : = speedOfCar * timeOfTrip;
Какие операторы неправильные?
program qq;
var a, b: integer;
x, y: real;
begin
a := 5;
10 := x;
y := 7 , 8;
b := 2.5;
x := 2*(a + y);
a := b + x;
end.
имя переменной должно быть слева от знака :=
целая и дробная часть отделяются точкой
нельзя записывать вещественное значение в целую переменную
Оператор ввода
read ( a ); { ввод значения переменной a}
read ( a, b ); { ввод значений переменных a и b}
Как вводить два числа?
через пробел:
25 30
через Enter :
25
30
a
25
b
30
a
25
b
30
10
10
10
Оператор вывода
write ( a ); { вывод значения переменной a}
write ln ( a ); { вывод значения переменной a и переход на новую строчку }
writeln ( ' Привет! ' ); { вывод текста }
writeln ( ' Ответ: ', c ); { вывод текста и значения переменной c}
writeln ( a, '+', b, '=', c );
10
10
10
Сложение двух чисел
Задача. Ввести два целых числа и вывести на экран их сумму.
Простейшее решение:
program qq;
var a, b, c: integer;
begin
read ( a, b );
c := a + b;
writeln ( c );
end.
10
10
10
Полное решение
program qq;
var a, b, c: integer;
begin
writeln(' Введите два целых числа ');
read ( a, b );
c := a + b;
writeln ( a, '+', b, '=', c );
end.
компьютер
Протокол :
Введите два целых числа
25 30
25+30=55
пользователь
10
10
ВЫЧИСЛИТЬ:
12 div 4 =
1 9 div 5 =
12 mod 3 =
1 36 mod 10 =
На Паскале
На языке математики
Sqrt(x)
Модуль числа х
Abs(x)
Возведение в квадрат числа х
Trunc(x)
Sqr(x)
е х
Round(x)
Вычисление дробной части
Корень квадратный из х
Frac(x)
Округляет до ближайшего целого числ
Exp(x)
Random(x)
Отсекает дробную часть
Sin(x)
Синус х
Exp/y*ln(x))
Возвращает случайное число от 0 до х
Cos(x)
Косинус х
Ln(x)
[ х ]
Int(x)
Pi
х у
Ln x
Задание
1. Вычислить длину окружности и площадь круга по заданному радиусу
2. Вычислить периметр прямоугольного треугольника по его катетам