ПЕРЕЛІК ДИСЦИПЛІН:
  • Адміністративне право
  • Арбітражний процес
  • Архітектура
  • Астрологія
  • Астрономія
  • Банківська справа
  • Безпека життєдіяльності
  • Біографії
  • Біологія
  • Біологія і хімія
  • Ботаніка та сільське гос-во
  • Бухгалтерський облік і аудит
  • Валютні відносини
  • Ветеринарія
  • Військова кафедра
  • Географія
  • Геодезія
  • Геологія
  • Етика
  • Держава і право
  • Цивільне право і процес
  • Діловодство
  • Гроші та кредит
  • Природничі науки
  • Журналістика
  • Екологія
  • Видавнича справа та поліграфія
  • Інвестиції
  • Іноземна мова
  • Інформатика
  • Інформатика, програмування
  • Юрист по наследству
  • Історичні особистості
  • Історія
  • Історія техніки
  • Кибернетика
  • Комунікації і зв'язок
  • Комп'ютерні науки
  • Косметологія
  • Короткий зміст творів
  • Криміналістика
  • Кримінологія
  • Криптология
  • Кулінарія
  • Культура і мистецтво
  • Культурологія
  • Російська література
  • Література і російська мова
  • Логіка
  • Логістика
  • Маркетинг
  • Математика
  • Медицина, здоров'я
  • Медичні науки
  • Міжнародне публічне право
  • Міжнародне приватне право
  • Міжнародні відносини
  • Менеджмент
  • Металургія
  • Москвоведение
  • Мовознавство
  • Музика
  • Муніципальне право
  • Податки, оподаткування
  •  
    Бесплатные рефераты
     

     

     

     

     

     

         
     
    Лабораторна робота № 2 по Delphi
         

     

    Інформатика, програмування


    Лабораторна робота № 2.

    Мета роботи: Вивчення методів візуального програмування в Delphi.

    Завдання: Побудувати графіки функцій;;


    Текст програми:

    unit Graph;

    interface

    uses
    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
    StdCtrls, TeEngine, Series, ExtCtrls, TeeProcs, Chart;

    type
    TForm1 = class (TForm)

    Edit1: TEdit;

    Edit2: TEdit;

    Edit3: TEdit;

    Edit4: TEdit;

    Edit5: TEdit;

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    Label4: TLabel;

    Label5: TLabel;

    Chart1: TChart ;

    Series1: TLineSeries;

    Series2: TLineSeries;

    Series3: TLineSeries;

    Button1: TButton; procedure Button1Click (Sender: TObject); private

    (Private declarations) public

    (Public declarations) end;

    var
    Form1: TForm1;

    implementation

    ($ R *. DFM)

    procedure TForm1.Button1Click (Sender: TObject);
    VAR T0, TK, Q, W, Y1, Y2, Y3: REAL; i, H: real;begin
    Q: = StrToFloat (Edit1.Text);
    W: = strToFloat (Edit2.Text);
    H: = StrToFloat (Edit3.Text);
    T0: = StrToFloat (Edit4.Text);
    TK: = StrToFloat (Edit5.Text);i: = T0;
    Series1.Clear;
    Series2.Clear;
    Series3.Clear;while i

         
     
         
    Реферат Банк
     
    Рефераты
     
    Бесплатные рефераты
     

     

     

     

     

     

     

     
     
     
      Все права защищены. Reff.net.ua - українські реферати ! DMCA.com Protection Status