Написать процедуру вычисления квадрата числа.Паскаль​

ответ: Я так понимаю, никто не давать ответы на такие вопросы :D

1.

#include <iostream>

using namespace std;

int main()

{

   long long i = 35, j = 31, sum = 0;

   while(i)

   {

       if(j % 2)

       {

           sum += j;

           i--;

       }

       j++;

   }

   cout << sum << endl;

   return 0;

}

ответ: 2275

2.

#include <iostream>

using namespace std;

int main()

{

   unsigned long long i = 35, j = 38, sum = 1;

   while(i--)

   {

       sum *= j;

       j++;

   }

   cout << sum << endl;

   return 0;

}

ответ: 9776069387944460288

3.

#include <iostream>

using namespace std;

int main()

{

   long long n, i = 1, n1, ans = 0;

   cin >> n;

   n1 = n/2;

   while(i <= n1)

   {

       if(!(n % i))

           ans++;

       i++;

   }

   cout << ans << endl;

   return 0;

}

4.

#include <iostream>

using namespace std;

int main()

{

   long long m, k, ans = 0;

   cin >> m >> k;

   for(; m <= k; m++)

       if(m % 5 == 0)

       ans++;

   cout << ans << endl;

   return 0;

}

Объяснение:

#include <iostream>
using namespace std;
int main()
{
cout <<"4,4"<<endl;cout <<"4,5"<<endl;cout <<"4,6"<<endl;cout <<"4,7"<<endl;cout <<"4,8"<<endl;cout <<"4,9"<<endl;cout <<"5,0"<<endl;cout <<"5,1"<<endl;cout <<"5,2"<<endl;cout <<"5,3"<<endl;cout <<"5,4"<<endl;cout <<"5,5"<<endl;cout <<"5,6"<<endl;cout <<"5,7"<<endl;cout <<"5,8"<<endl;cout <<"5,9"<<endl;cout <<"6,0"<<endl;cout <<"6,1"<<endl;cout <<"6,2"<<endl;cout <<"6,3"<<endl;cout <<"6,4"<<endl;
}