Что вы можете сказать о формах представления информации в презентации и учебнике?

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

#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;

}

Программа:

const n=6; m=5;

var

x:array[1..n,1..m] of integer;

i,j,a,b,k:integer;

f:boolean;

begin

Randomize;

writeln('Исходный массив:');

for i:=1 to n do

begin

for j:=1 to m do

 begin

  x[i,j]:=random(50);

  write(x[i,j]:4);

 end;

 writeln;

end;

write('a, b: ');

readln(a,b);

k:=0;

for i:=1 to n do

begin

f:=false;

for j:=1 to m do

 if (x[i,j]>=a)and(a<=b) then f:=true;

if f then k:=k+1;

end;

writeln('k = ',k);

end.

Пример:

Исходный массив:

  2  42  11  34  11

 26  46  37  21  12

  7  18   8  11  29

 25  38   4  18  14

  8  13   8  46  41

 22  29   3  47  46

a, b: 40 50

k = 4