Два задания.Нужно написать код на с++.

===== PascalABC.NET =====

#1

y := (a * x + 2 * b * x * x) * Abs(Cos(x * x)) / (Pi * Exp(x));

y := (a * Ln(b * x)) ** (1 / 3) / (1 + Sqr(Sin(a * x)));

y := (Abs(Sin(x ** 3)) + a) * Exp(a) / (b * b + c * c) ** (1 / 3);

#2

begin

 var (a, x) := ReadReal2('Введите a и x:');

 var t := x ** 3 - a;

 t := Sign(t) * Abs(t) ** (1 / 3);

 var y := t + Sin(x * x) / a;

 Print('y =', y)

end.

Операция возведения в степень ** в PascalABC.NET определена только для неотрицательного аргумента, поскольку она выполняется с использованием логарифма. В то же время, в математике операция извлечения корней нечетной степени для отрицательного аргумента опеределена и допустима. В соответствии с этим, извлечение кубического корня в программе производится из абсолютной величины аргумента и последующим присваиванием знака этого аргумента результату. Если имеется потребность вычислять подобные корни в нескольких местах программы, имеет смысл ввести для этого собственную функцию.

Program 1

#include<iostream>

using namespace std;

int main() {

int n = 5;

int p = 1;

int input;

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

 cout << "input number " << i + 1 << endl;

 cin >> input;

 p *= input;

}

cout << p << endl;

cin >> n; // for pause

return 0;

}

Program 2

#include<iostream>

using namespace std;

int main() {

int n;

int p = 0;

int input;

cout << "n = " << endl;

cin >> n;

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

 cout << "input number " << i + 1 << endl;

 cin >> input;

 p += input;

}

cout << p << endl;

cin >> n; // for pause

return 0;

}

Program 3

#include<iostream>

using namespace std;

int main() {

int n;

int count = 0;

int input;

cout << "n = " << endl;

cin >> n;

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

 cout << "input number " << i + 1 << endl;

 cin >> input;

  if(input < 0) count ++;

}

cout << count << endl;

cin >> n; // for pause

return 0;

}