- •«Первые простые программы». Блокнот.
- •Свойства компонента txt
- •Компонент меню
- •Компоненты диалоговых окон открытия и сохранения файла
- •Событие Onclick команды меню Файл Новый.
- •Введите код, выделенный ниже полужирным шрифтом:
- •Событие Onclick команды меню Файл Открыть
- •Событие OnClick команды меню Файл Сохранить
- •Событие OnClick команды меню Файл Выход
- •Событие OnCreate формы
- •Сохраните создаваемый проект в своей папке.
- •Компиляция и запуск программы
- •Файл Close All.
- •Выполните самостоятельно:
- •Калькулятор.
- •Сохраните создаваемый проект в своей папке.
- •Компиляция и запуск программы
- •Файл Close All.
- •Выполните самостоятельно:
- •Краткие теоретические сведения к пункту 10.7.
- •В Object Pascal это выражение будет выглядеть так:
Краткие теоретические сведения к пункту 10.7.
Математические функции языка Object Pascal
-
abs(x)
Модуль аргумента -
arctan(x)
Арктангенс аргумента (угол в радианах)
sin(x)
Синус
cos(x)
Косинус
exp(x)
Экспонента -
sqr(x)
Квадрат аргумента -
sqrt(x)
Корень квадратный аргумента -
ln(x)
Логарифм натуральный
frac(x)
Дробная часть числа
int(x)
Целая часть числа
trunc(x)
Отбрасывает дробную часть числа
round(x)
Округляет x до ближайшего целого значения
pi
=3.141592653…
random(x)
Псевдослучайное число, расположенное в диапазоне 0…(х-1)
Так как функции тангенса и котангенса в языке Pascal отсутствуют, они выражаются через значения синуса и косинуса:
.
Десятичный логарифм можно выразить следующим способом –
В языке Pascal нет возведения в степень. Возведение в степень для положительных значений можно выполнить с помощью следующих соотношений:
Примеры выражений:
В Object Pascal это выражение будет выглядеть так:
0.3*exp(5*ln((sqr(sin(x))-sqr(cos(x)))/exp(x))
x*sqrt(abs(cos(x)-1))/sqrt(exp(3*ln(abs(x))))
