28.01.2019 8-Б класс. 30.01.2019 8-А класс

Тема: Алгоритмы с ветвлениями для обработки величин.

Команда полного ветвления в языке программирования  Object Pascal имеет такой общий вид:
If <логическое выражение>
Then 
begin <последовательность команд 1>
Еlse
begin <последовательность команд 2>
end;
(англ.If-если, then-то, else-иначе).
Исполняется эта команда так: вычисляется значение логического выражения; если это значение true, то исполняется последовательность команд 1 и после этого исполняется команда, следующая за ветвлением; если это значение false, то исполняется последовательность команд 2 и после этого исполняется команда, следующая за ветвлением.
Есть в Object Pascal  и команда неполного ветвления:
If <логическое выражение>
Then 
begin <последовательность команд >
end;
Исполняется эта команда так: вычисляется значение логического выражения; если это значение true, то исполняется последовательность команд  и после этого исполняется команда, следующая за ветвлением;   если это значение false, то сразу исполняется команда, следующая за ветвлением.

Переменная — область оперативной памяти, в котором лежит какое-то значение. Основные типы переменных в Object Pascal: 

• Integer — целые числа.
• Real — целые и дробные числа.
• Boolean — логический тип.
• Char — символьный тип данных.
• String — строковой тип данных.

Если записать на языке Object Pascal алгоритм, нахождения меньшего числа из двух, он будет выглядеть так:

procedure TForm1.Button2Click(Sender: TObject);
var x,y:integer;
begin
x:=StrToInt(Edit1.Text);
y:=StrToInt(Edit2.Text);
if x=y then ShowMessage('Числа равны ')
else
if x<y then ShowMessage('min ' + IntToStr(x))
else ShowMessage('min ' +IntToStr(y));
end;
end. 

Домашнее задание:
учебник: п.6.4. стр.200-206, №7 стр.206 (составить блок-схему, написать код в тетради)