result init

Smart pascal source code


function MyStr: String;
begin
  Result := Result + Result;
end;

function MyInt: Integer;
begin
  Result := Result - Result;
end;

function MyFloat: Float;
begin
  Result := Sqr(Result);
end;

WriteLn(MyStr);
WriteLn(MyInt);
WriteLn(MyFloat);

{<<< RESULT - CONSOLE LOG >>>
-----------------------------

0
0
-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}

function MyStr() {
   var Result = "";
   Result+=Result;
   return Result
};
function MyInt() {
   var Result = 0;
   Result-=Result;
   return Result
};
function MyFloat() {
   var Result = 0;
   Result = (Result*Result);
   return Result
};

/* <<< main JS >>> */

   WriteLn(MyStr());
   WriteLn(MyInt());
   WriteLn(MyFloat());