Составьте на паскале программу возведения в n-ую степень целого числа x

program multy; var i, n, x, mt: integer; beginwrite('введите целое число x '); readln(x); write('введите степень n '); readln(n); mt: =x; for i: =1 to (n-1) do    begin        mt: =mt*x;     end; writeln(x,' в степени ',n,' равно ',mt); end.

program power;

var i, n, x, res: integer;

begin

readln(x, n);

res: =x;

for i: =1 to (n-1) do

    begin

      res: =res*x;

    end;

writeln(res);

end.

#include

#include

#include

using namespace std;

int main(){

    vector a;

    int n, k;

    cin > > n > > k;

    a.resize(n);

    for(int i = 0; i < n; i++){

        cin > > a[i];

    }

    long long pr = 1;

    for(int i = 0; i < n; i++){

        if(k < = 0) break;

        if(a[i] % 2 == 1){

            pr *= a[i];

            k--;

        }

    }

    cout < < pr;

}

ответ:

объяснение:

1) организуем ввод данных

3) создадим функцию, которая вычисляет сумму чётных элементов

4) создадим функцию, которая вычисляет сумму нечётных элементов

5) выведем разность первой и второй функции

пример реализации функций (для чётных, для нечётных аналогично)

1) если а чётно, то начнём с неё, иначе с а+1 элемента

2) если в чётно, то закончим им, иначе в-1

3) количество элементов n - ((верхняя граница - нижняя граница) целочисленно разделить на 2) + 1  

4) прогрессия (нижняя граница + верхняя граница)*n/2

5) присваиваем значение 4 функции

6) аналогично организуем для нечётных элементов