[Boris the Blade]

N = M * n^p - вот отсюда вроде матисса берется? Если да, то она у тебя странная какая-то... но не суть.

На форму загоняешь edit, memo и кнопку. Далее

Код:

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Math;
// В uses добавляешь Math

...
...
...

procedure TForm1.Button1Click(Sender: TObject);
var
  _value : extended;
begin
  memo1.Clear;
  if TrystrtoFloat(edit1.text,_value) then
  begin
    memo1.Lines.Add(floattostr( какая-то функция (StrToFloat(edit1.text))));
    memo1.Lines.Add(floattostr( какая-то функция (StrToFloat(edit1.text))));
    memo1.Lines.Add(floattostr( какая-то функция (StrToFloat(edit1.text))));
  end
end;

P.S. Поскольку я не смог сходу сообразить что ты делаешь с числом чтоб получить знак экспоненту и мантиссу - я вместо них напечатал "какая-то функция"