Тема: Основы объектно-ориентированного визуального программирования.
Проект Калькулятор
procedure TForm1.Button1Click (Sender: TObject); var a, b : integer ; c: real ; begin a:=StrToInt ( Edit1.Text ) ; b:=StrToInt ( Edit2.Text ) ; c:=a+b; Label3.Caption:= ’Ответ: ’+FloatToStr (c); end.
Задание: Создать проект "Калькулятор"
|