но, то вікно НЕ закроется.TForm1.FormClose (Sender: TObject; var Action: TCloseAction); begin Stop: = true;// зупинити (якщо включений) цикл малювання end; Після запуску програми, установки прапорця "Усі" і натисненні на кнопку "Старт" на екрані відобразиться графік:
В
Виконати самостійно:
. Додайте CheckBox В«ІнвертуватиВ», при виборі якого колір галузі побудови стає чорним, а графіки функцій вимальовуються білим кольором. p align="justify"> 2. Зробіть так, щоб у неінвертірованном режимі синусоїда зображувалася червоним кольором, а косінусоіда - синім. p align="justify"> Результатом виконання даної лабораторної роботи є створений згідно із завданням програмний продукт. Виконане завдання повинне бути пред'явлено викладачеві в електронному вигляді. У ході захисту лабораторної роботи студент повинен продемонструвати свої навички роботи з вивченими компонентами та методами проектування інтерфейсу користувача. br/>
Лабораторна робота № 5 . Створення найпростішого калькулятора
Мета: Вивчення структури CASE і особливостей роботи з математичними функціями. Перетворення типів і обробка виняткових ситуацій.
Короткі теоретичні відомості.
Математичні функції мови 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 p = 3.141592653 ... random (x) Псевдовипадкове число, розташоване в діапазоні 0 ... (х-1)
Так як функції тангенса і котангенс в мові Pascal відсутні, вони виражаються через значення синуса і косинуса:
В
Десятковий логарифм можна виразити таким способом -
В
У мові Pascal немає зведення в ступінь. Піднесення до степеня для позитивних значень можна виконати за допомогою наступних співвідношень:
В
Приклади виразів:
В
У Object Pascal це вираз буде виглядати так:
При використанні вікон редагування для висновку, введення і редагування чисел необхідно використовувати функції взаємного перетворення рядків і чисел. FloatToStr і IntToStr перетворять відповідно речові і цілочисельні змінні в рядкові. Функція StrToFloat призначена для перетворення рядка в значення з плаваючою комою, і StrToIn...
