Größte Integer-Variable?

[gmarts]

Delphi-Quellcode:

var i:integer;

uses kubmstrings;

procedure bla;
var i:integer;
  basis,exponent:string;
begin
 s:='1';
 basis:='365';
 exponent:='365'
 for i:=1 to exponent do
  begin
   s:=multstr(s,basis);
  end;
 result:=s;
end;

So schwer ist das doch nicht!