вівторок, 2 лютого 2021 р.

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.
 

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


Немає коментарів:

Дописати коментар