1. 

   AsDf New Member

   И еще пожалуйста) P=sin(sqrt(abs(x)))*sin(sqrt(abs(2x)))*...*sin(sqrt(abs(n*x)))

    

   AsDf, 28 мар 2010

   #1
2. 

   kosolapyj_man New Member

   var
     P, pr, x: real;
     i, n: integer;
    
   begin
     P:= 1;
     writeln('Введите n');
     readln(n);
     writeln('Введите x');
     readln(x);
     for i:= 1 to n do
     begin
       pr:= sin(sqrt(abs(i * x)));
       P:= pr * P;
     end;
     writeln('P = ', P : 0 : 5);
   end.
       
          

    

   kosolapyj_man, 28 мар 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня