Самостійна робота
Створіть проект для обчислення значення виразу (3a-2b)c
procedure TForm1.Button1Click(Sender: TObject);
____
a,b,c,z___real;
begin
a:=__________(Edit1.Text);
b:=StrToFloat(______2.Text);
___:=StrToFloat(Edit3.Text);
Z___(3*a-2*b)*c;
Label1.Caption:=_________________(z);
end;
Які об’єкти необхідно розмістити на формі?
__________________________________________________________________________________________________________________________________________________________________
Немає коментарів:
Дописати коментар