Решить : дан массив целых чисел х, состоящий из 10 введенных с клавиатуры элементов. - найти сумму элементов, имеющих нечетное значение; - вывести те элементы, значение которых больше 15

Тут опиши переменные, создай массив,  заполни его. дальше: summa : = 0; for counter = 1 to 10 do   if (massive[counter] mod 2 < > 0) then         summa : = summa + 1;                   //сумма нечетных   if (massive[counter] > 15) then write(massive[counter]     ,   ',')   //все те, что б                                                                                                     //ольше 15         writeln(summa); readln() end.

если я правильно понял что bx нужно возвести в степень 2-a (и тоже самое с e) написано на паскале abc

 

 

program asd; uses crt; var x,b,a,t,g,e: integer; begin writeln('введите x'); readln(x); writeln('введите b'); readln(b); writeln('введите a'); readln(a); writeln('введите t'); readln(t); writeln('введите g'); readln(g); writeln('введите e'); readln(e); writeln('данные первого примера: a=', a, ' b=', b ,' x=',x ,' t=', t , ' g=', g); writeln('результат 1 примера: ', sqr(x)*x * sqr(t*g) * (sqr(x+b) +a/sqrt(x+; writeln('данные второго примера: a=', a, ' b=', b ,' x=',x ,' e=', e); writeln('результат 2 примера: ', ( power(b*x,2-a) )/ (power(e,a*x-1) ) ); end.

дано:                                 решение

n=256                                  n=2 в степени i

k=30*70*5                        256=2 в степени 8 бит

найти v                            v=i*k

                                                      v=8*30*70*5=84000бит