Простой линейный алгоритм Delphi

[efgen]

Здравствуйте! В универе парят мозг с информатикой, а сейчас идёт Delphi, в котором я, признаться, не особо-то и шарю.
Задание первой лабораторной: Создайте приложение, вычисляющее значение функции, приведенной в таблице, в соот-ветствии с предложенным преподавателем вариантом.
Замутить нужно такую формулу:
(sqr(x)+6*cos(power(x,3)))/(2-ln(3*a))+power(x,2/3)
Сделали. Вот полный текст модуля:

unit Unit1;
interface
uses
  Windows, Math, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type
  TForm1 = class(TForm)
    Edit1: TEdit;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var x,a,f:real;
begin
   x:=StrToInt(Edit1.Text);
   a:= StrToInt(Edit2.Text);
   f:=(sqr(x)+6*cos(power(x,3)))/(2-ln(3*a))+power(x,2/3);
   MessageDlg('Функция f='+IntToStr(f),  mtInformation, [mbOK], 0);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
   Application.Terminate;
end;
end.

Но вот здесь

f='+IntToStr(f)

Дельфин ругается на то, что нифиги не Int, а real. Но как сюда вопхнуть real, не знаю. Основу модуля скопил из другой программы. Подскажите, пожалуйста, как поступить.
p.s. Если администрация не против, буду задавать и дальнейшие вопросы здесь же, а не создавать новые темы.

[Smitt&Wesson]

И правильно ругается.
FloatToStr(f).
Или приведение типов IntToCtr((integer)f);

[efgen]

Сообщение от Smitt&Wesson

И правильно ругается.
FloatToStr(f).
Или приведение типов IntToCtr((integer)f);

Спасибо большое, компиляция прошла успешно, но в итоге выполнения программы по этому модулю

unit Unit1;
interface
uses
Windows, Math, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Edit1: TEdit;
Edit2: TEdit;
Label1: TLabel;
Label2: TLabel;
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var x,a,f:real;
begin
x:=StrToInt(Edit1.Text);
a:= StrToInt(Edit2.Text);
f:=(sqr(x)+6*cos(power(x,3)))/(2-ln(3*a))+power(x,2/3);
MessageDlg('Функция f='+FloatToStr(f), mtInformation, [mbOK], 0);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Application.Terminate;
end;
end.

появляется просто пустое окно, а по условию задачи должны быть две строчки описания переменных, два поля для ввода переменных а и х, и две кнопки, одна из которых вычисляет результат по функции, а вторая выходит из программы.

[Mad_Cat]

появляется просто пустое окно, а по условию задачи должны быть две строчки описания переменных, два поля для ввода переменных а и х, и две кнопки, одна из которых вычисляет результат по функции, а вторая выходит из программы.

А на форму все это дело накидать - Силенок не хватает?

[efgen]

Сообщение от Mad_Cat

А на форму все это дело накидать - Силенок не хватает?

Я ж говорю, что в этом деле я как свинья в апельсинах. У нас еще ни одной лекции по Делфи не было, а Лабу делать надо. И что значит "накидать на форму" я тоже не понял.

[Mad_Cat]

Вам Сюда

[efgen]

Сообщение от Mad_Cat

Вам Сюда

Спасибо большое и Вам, Mad_Cat, и Smitt&Wesson. Совместными усилиями победили первую лабу.

[efgen]

Ребят, подскажите кто-нибудь, где можно почитать подробнее и на наиболее простом языке о создании разветвляющихся и циклических алгоритмов, ато врученная методичка ни на что не годна, а в сети при наборе в поисковике выдаёт лишь похожие методички.