1.2 Основные операторы, процедуры и методы используемые в написании программного кода
При написании кода использовались следующие операторы:
1)Условный оператор If – позволяет проверить некоторое условие и в зависимости от результатов проверки выполнить то или иное действие.
Структура условного оператора имеет следующий вид:
If <условие > then < оператор1 > else < оператор2 > ;
где If, then, else – зарезервированные слова (если, то, иначе) ;
<условие > - произвольное выражение логического типа ;
< оператор1 > , < оператор2 > - любые операторы языка Delphi.
2) Оператор повтора for:
for i:=in to ik do <оператор>;
i – переменная цикла;
in – её начальное значение;
ik – её конечное значение.
Переменная цикла может быть любого порядкового типа кроме вещественного,
переменную цикла ( i ) в теле цикла изменять нельзя.
Оператор for применяется в тех случаях, когда заранее известно количество повторений и обеспечивает выполнение тела цикла до тех пор пока не будут перебраны все значения переменной цикла. Переменная цикла изменяется на 1 для формы оператора for to.
3)Оператор присваивания:
Имя переменной := выражение.
Требование:
тип переменной и тип выражения один и тот же.
Исключение:
имя переменной - вещественное, а выражение - целое.
Кроме описанных выше, в приложении использованы методы обработки событий, происходящих на форме, код которых создан во время работы приложения.
procedure TForm1.Button1Click(Sender: TObject) – эта процедура выполняет решение.
procedure TForm1.Edit1Change(Sender: TObject) – эта процедура изменяет количество столбцов .
1.3 Форма приложения, описание используемых свойств компонентов
Одним из основных элементов приложения является форма, из которой пользователь управляет событиями, происходящими во время работы приложения.
Рисунок 1.2 – Форма приложения до выполнения программы
Рисунок 1.3 – Форма приложения после выполнения программы.
На форме расположили следующие компоненты:
На форме размещены следующие компоненты:
Label – компонент содержащий текст (4 штуки);
Edit – компонент для ввода текста (1 штука);
Button – кнопка для расчета (2 штука);
StringGrid – компоненты для ввода, вывода табличного текста (3 штуки);
1.4 Текст программного кода.
Ниже помещен текст программы для решения поставленной задачи, содержащий необходимые комментарии. Комментарии размещены в тексте приложения в соответствии c синтаксисом Delphi.
unit Unit1;
Interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, Grids;
type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
StringGrid1: TStringGrid;
Button2: TButton;
Label1: TLabel;
StringGrid2: TStringGrid;
StringGrid3: TStringGrid;
Label2: TLabel;
Label3: TLabel;
Label4: TLabel;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
type matr=array [1..20, 1..20] of real;
Const
Nmax=100; // Максимальный размер массива
Var
Form1: TForm1;