По информатике задали это y^n n=1, 2, 3, 4, 5. что делать?

Var y, n, d, c: integer; begin d: =1; write('y = '); readln(y); for n: =1 to 5 do begin d: =d*y; writeln(y, '^', n, ' = ', d); end; end.

#include < iostream> #include < cstdlib> using namespace std; int main(){ int n = 10; int arr[n]; for(int i = 0; i < n; ++i){ arr[i] = rand() % 300 - 150; cout < < arr[i] < < " "; } cout < < endl; /*начало важной части*/ for(int i = 0; i < n/2; ++i){ int buff = arr[2*i]; arr[2*i] = arr[2*i+1]; arr[2*i+1] = buff; } /*конец важной части*/ cout < < "result: "; for(int i = 0; i < n; ++i) cout < < arr[i] < < " "; cout < < endl; system("pause"); return 0; }

#include < iostream> using std: : cout; using std: : endl; #include < cstdlib> using std: : rand; using std: : srand; #include < ctime> using std: : time; int main(){      int a[10];       srand(time(0));       for(int i = 0; i < 10; i++)      {            a[i] = rand() % 201 - 100;             cout < < a[i] < < ' ';       }      cout < < endl;       int temp;       for(int i = 0; i < 5; i++)      {            temp = a[i];             a[i] = a[i + 5];             a[i + 5] = temp;       }      for(int i = 0; i < 10; i++)      {            cout < < a[i] < < ' ';       }      cout < < endl;       return 0; }