Известен факториал некоторого числа m. Необходимо найти исходное число m. Формат входных данных Вводится целое число m! (1≤m!≤231−1), являющееся факториалом числа m. Формат выходных данных Требуется вывести натуральное число m. Примечания Факториалом числа k называется произведение всех чисел от 1 до k включительно, то есть k!=1⋅2⋅3⋅...⋅k. Примеры входные данные выходные данные 1 1 24 4

var

 fa: real;

 i, m: integer;

begin

 readln(fa);

 i := 1;

 while fa <> 1 do

 begin

   fa := fa / i;

   m := i;

   i += 1;

 end;

 writeln(m);

end.

Вот, на С++, можешь немного подогнать под себя

#include <iostream>

using namespace std;

int main()

{

   setlocale(0,"");

   int numb, data=0, i=1;

   cout<<"Введите число: ";

   cin>>numb;

   data=i;

   while(numb!=data)

   {

       if(data>numb)

       {

           cout<<"Не существует такого числа, факториал которого равен "<<numb<<endl;

           break;

       }

       i++;

       data*=i;

   }

   if(data==numb)

   {

       cout<<endl<<"Результат вычислений: "<<i<<endl;

   }

   system("pause");

   return 0;

}