Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Контрольные работы » Програмування на мові об'єктно-орієнтованого та візуального програмування Delphi

Реферат Програмування на мові об'єктно-орієнтованого та візуального програмування Delphi





Завдання 1. Обчислення виразів. Використання стандартних функцій. Робота з графікою


Мета завдання:

Вивчення порядку дій при обчисленні вираженні. Вивчення способів введення даних з клавіатури. Створення графічних областей. Обробка повідомлень про становище миші і введенні точок з її допомогою в графічній області.

Постановка завдання.

На формі відтворити формулу для обчислення, передбачити введення з клавіатури будь-якого значення Х і виведення результатів розрахунку за формулою. Організувати на формі область, в якій намалювати графіки згідно з наведеним варіанту. Користувач може вводити координати точки з клавіатури і/або клікнути по малюнку з областями, вказавши точку, щодо координат якої провести перевірку приналежності точки даної області. Кольором в галузі графіки та коментарями на формі зробити висновок про приналежність вказаної точки областям.

Варіант завдання:



В 

1) при Х = -0.7129

2) координати досліджуваної точки: (-0.5; -0.9)

Код програми:

Unit1;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, TeEngine, Series, TeeProcs, Chart, StdCtrls, ExtCtrls, TeeFunci,; = class (TForm): TPanel;: TEdit;: TLabel;: TLabel;: TButton;: TChart;: TLineSeries;: TLabel;: TPanel;: TChart;: TShape;: TChartShape;: TEdit;: TLabel;: TEdit;: TLabel;: TButton;: TLabel; btn1Click (Sender: TObject); FormCreate (Sender: TObject); btn2Click (Sender: TObject); cht2Click (Sender: TObject); Y (const x: real): Real; SetDot (const x, y: Real);

{Public declarations};: TForm1;

{$ R *. dfm} TForm1.Y (const x: real): Real;: = Sin (arctan (x));; TForm1.btn1Click (Sender: TObject); = 4; = 0.1;: Real;. Caption: = FloatToStr (Y (StrToFloat (edt1.Text)));. Clear;: =-Range; x 0 ) and (y <- x + 1)) then.Brush.Color: = clWhite; 6.Caption: = 'Точка преналежить області';

end.Brush.Color: = clRed; 6.Caption: = 'Крапка не преналежить області';

end; TForm1.btn2Click (Sender: TObject); (StrToFloat (edt2.Text), StrToFloat (edt3.Text));; TForm1.cht2Click (Sender: TOb...


сторінка 1 з 6 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Analysis of Control System and Synthesis of Real Compensator
  • Реферат на тему: Аналіз діяльності туристичної агенції &Real-Travel&
  • Реферат на тему: Розробка програми для вирішення завдання &Знаходження спільної точки N кіл&
  • Реферат на тему: Аналіз ДІЯЛЬНОСТІ туристичної агенції "Real-Travel"
  • Реферат на тему: Шляхи вдосконалення PR-ДІЯЛЬНОСТІ туристичного підприємства "Real-trav ...