[с++] дано натуральное число n. указать такие неотрицательные целые x, y, z, t, что n=x²+y²+z²+t².

#include< iostream> using namespace std; int main() { int n; cout < < "enter n" < < endl; cin > > n; for (int x = 0; x < = sqrt(n); x++)     for (int y = 0; y < = sqrt(n); y++)         for (int z = 0; z < = sqrt(n); z++)           for (int t = 0; t < = sqrt(n); t++)               if (x*x + y*y + z*z + t*t == n)              cout < < "x=" < < x < < " y=" < < y < < " z=" < < z < < " t=" < < t < < endl; system("pause"); return 0; }

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 * ;

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 определена только для неотрицательного аргумента, поскольку она выполняется с использованием логарифма. в то же время, в операция извлечения корней нечетной степени для отрицательного аргумента опеределена и допустима. в соответствии с этим, извлечение кубического корня в программе производится из абсолютной величины аргумента и последующим присваиванием знака этого аргумента результату. если имеется потребность вычислять подобные корни в нескольких местах программы, имеет смысл ввести для этого собственную функцию.