В Delphi оператор присваивания состоит из двух символов: двоеточия и знака равенства. Эти символы всегда пишут слитно. Пробелы допускаются перед символом двоеточия и после символа равенства.
В общем случае оператор присваивания имеет вид:
имя_переменной := значение;
где значение это выражение, переменная, константа или функция.
Выполняется оператор так. Сначала вычисляется значение выражения указанного в правой части оператора, а затем его результат записывается в область памяти, имя которой указано слева.
Например, запись a:=b означает, что переменной а присваивается значение b.
Типы переменных a и b должны совпадать или быть совместимыми для присваивания, то есть тип, к которому принадлежит переменная b, должен находиться в границах типа переменной а.
Оператор присваивания, как и любой другой оператор Delphi заканчивается точкой с запятой.
Например,
b:=3;
a:=b;
c:=a+2*b;
c:=c+1;
a:=a*3;
ЗАДАЧА. Пусть в переменной а хранится значение равное 3, а в переменную b записали число 5. Поменять местами значения переменных а и b.
Для решения задачи понадобится дополнительная переменная c. В ней временно сохраняется значение переменной а. Затем, значение переменной b записывается в переменную a, а значение переменной c в переменную b.
с:=a; // Шаг 1. с=3
a:=b; // Шаг 2. a=5
b:=c; // Шаг 3. b=3
ЗАДАЧА. Заданы длины двух катетов прямоугольного треугольника a, b. Вычислить длину гипотенузы c и величины двух его углов α и β.
Математические формулы, необходимые для решения задачи:
, , β=π/2-α.
Этапы решение задачи:
1. Определение значений a, b (ввод величин a и b в память компьютера).
2. Расчет значений c, α и β по приведенным выше формулам.
3. Вывод значений c, α и β.
Блок-схема алгоритма
Вид формы:
Заголовки компонентов формы.
Компонент
Свойство Caption
Form1
Параметры треугольника
Label1
Катеты треугольника
Label2
a=
Label3
b=
Label4
Гипотенуза с=
Label5
Угол alfa=
Label5
Угол betta=
Button1
ВЫЧИСЛИТЬ
Двойной щелчок по кнопке «ВЫЧИСЛИТЬ» приведет к созданию процедуры:
procedure TForm1.Button1Click(Sender: TObject);
begin
end;
и ее описанию в разделе interface.
Созданная процедура не содержит ни одной команды. Задача программиста заполнить шаблон описаниями и операторами. В нашем случае процедура будет иметь вид: