ня в Turbo Pascal 7.0 і Delphi - СПб.: BHV - Санкт-Петербург 1998 - 240с. p align="justify">. Гризлов В.І., Гризлова Т.П. Турбо Паскаль 7.0 - М.: ДМК, 1998 - 400с. p align="justify">. Ж.Джонс, К.Жарроу Рішення задач в системі TurboPascal. - М., Фінанси і статистика 1991 - 714с. p align="justify">. Delphi 5. Керівництво програміста. - М.: В«НолиджВ», 2001. - 880с
. Архангельський А. Я. Delphi 7. Довідковий посібник, - М: ЗАТ ? Видавництво БІНОМ, 2003.
. Культин Н. Б. Delphi 6 Програмування на Object Pascal - СПб: БХВ-Петербург 2001 - 528с: іл. p align="justify">. Архангельський А. Я. Прийоми програмування в Delph. Версії 5-7. - М: ЗАТ ? Видавництво БІНОМ ? , 2003.
. Фленов М. Є. Біблія Delphi. - СПб.: БХВ-Петербург, 2004. - 880с.: p align="justify">. Грінзоу Лу. Філософія програмування для Windows 95/NT. пер.с англ. - СПб.: Символ-плюс, 1997. - 640с. p align="justify"> Тейксейра C, Пачеко До Borland Delphi 6. Керівництво розробника. : Пер. з англ. - М.: Видавничий дім Вільямс , 2002. - 1120с.
Додаток 1
Текст програми
unit UnitMain;
interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, DateUtils, ExtCtrls; = class (TForm): TGroupBox;: TMemo;: TGroupBox;: TButton;: TGroupBox ;: TButton;: TButton;: TButton;: TButton;: TButton;: TGroupBox;: TButton;: TButton;: TButton; _Shablon: TLabeledEdit;: TGroupBox;: TMemo;: TCheckBox; Button1Click (Sender: TObject); Button2Click ( Sender: TObject); Button3Click (Sender: TObject); Button4Click (Sender: TObject); Button5Click (Sender: TObject); Button6Click (Sender: TObject); Button7Click (Sender: TObject); Button9Click (Sender: TObject); Button8Click (Sender : TObject);
{Private declarations}
{Public declarations};: TMainForm;: array [0 .. 1000] of String;: integer;: TLargeInteger;, T2: TLargeInteger;
{$ R *. dfm} TMainForm.Button1Click (Sender: TObject);, i: integer; Memo1.Text <>'' theni: = 1 to Memo1.Lines.Count do [i]: = Memo1 . Lines [i-1];: = Memo1.Lines.Count;. Enabled: = true;. Enabled: = true;. Enabled: = true;. Enabled: = true;. Enabled: = true;. Enabled: = true;. Enabled: = true;. Enabled: = true; _Shablon.Enabled: = true;. Enabled: = true; ('Не введений список!', mtWarning, [mbOK], 0);; TMainForm.Button2Click (Sender : TObject);, j, min: integer;: String; (iCounterPerSec); (T1); i: = 1 to kol-1 do: = i; j: = i +1 to kol domas [j]
