Вычислить значение выражения по формуле (все переменные принимают действительные значения). Написать надо на Си или Си++

#include <iostream>

#include <cmath>

using namespace std;

int main()

{

   double x, y;

   cin >> x >> y;

   cout << (3 + exp(y - 1)) / (1 + x * x * fabs(y - tan(x))) << endl;

   system("pause");

   return 0;

}

Объяснение:

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.

var a,p: real;

i,n: integer;

begin

  read(a,n);

  p: =1;

  for i: = 0 to n-1 do

    p: =p*(a+i);

  writeln(p);

end.