03/05.02.2021, 8 класс

 Изменения в режиме работы на уроке информатики в связи с утверждением нового "Санітарного регламенту для закладів загальної середньої освіти": чередование компьютерной и безмашинной части уроков, индивидуальная работа с ПК.

Вложенные ветвления

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. 

Работаем в классе:

• Выполнить задание 9 стр.206 в среде программирования Lazarus
• Выполнить задание в безмашинном варианте