Дополнить функцию, которая вычисляет факториал числа.

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
String fcktrl(int N)
{int n = N;
 
//---------
while(--n)
N = N *(n);
//---------
 
return ((String)N);
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{int X = Edit1->Text.ToInt();
 
Label1->Caption = fcktrl(X);
}
//---------------------------------------------------------------------------

String fcktrl(int &N, float &flt, double &dbl, long &lng)
{
ShowMessage("Nothing do not understand");
return ("error");
}

// перегрузка
int factorial(int N)
{
   int res=1;
   for (int i=2; i<=N; i++)
      res *= i;
   return res;
}
 
long factorial(long N)
{
   long res=1;
   for (int i=2; i<=N; i++)
      res *= i;
   return res;
}
 
float factorial(float N)
{
   float res=1;
   for (int i=2; i<=N; i++)
      res *= i;
   return res;
}
 
double factorial(double N)
{
   double res=1;
   for (int i=2; i<=N; i++)
      res *= i;
   return res;
}
 
// шаблон
template<typename Type>
Type factor(Type N)
{
   Type res=1;
   for (int i=2; i<=N; i++)
      res *= i;
   return res;
}