Тест “Лазарус”
ВПРАВИ:
Вправа 27. Величина та їхні властивості | 8 клас | Бондаренко
procedure
TForm1.Button1Click(Sender: TObject);
var A, B, C:Integer;
begin
A:=5;
B:=10;
C:=A+B;
Label1.Caption:=IntToStr(C);
C:=A*B;
Label2.Caption:=IntToStr(C);
end;
procedure
TForm1.Button2Click(Sender: TObject);
var
x, y: Integer;
begin
x:=5;
y:=6;
x:=y+x;
Label2.Caption:=IntToStr(X);
Label1.Caption:=IntToStr(X);
end;
end;
procedure
TForm1.Button1Click(Sender: TObject);
var A, B, C:Integer;
begin
A:=5;
B:=10;
C:=A+B;
Label1.Caption:=IntToStr(C);
C:=A*B;
Label2.Caption:=IntToStr(C);
end;
|
procedure
TForm1.Button2Click(Sender: TObject);
var
x, y: Integer;
begin
x:=5;
y:=6;
x:=y+x;
Label2.Caption:=IntToStr(X);
Label1.Caption:=IntToStr(X);
end;
end;
|
Немає коментарів:
Дописати коментар