n - натуральное, x - действительное. Вычислить.

[dmitriy20104]

n - натуральное, x - действительное. Вычислить: (x^n)^2/2^n.

[ARudik]

p:=x; // p - дополнительная перемеренная
for i:=1 to n do 
p:=p*x;   // подносим к степени n
p:=p*p // квадрат результата
z:=2;
for i:=1 to n do z:=z*2 // подносим число 2 в степень n
result:=p div z
writeln(result);

все переменные надеюсь сам введешь

[s-andriano]

Может, для методического единства и произведение будем считать в цикле сложений?

Кстати, попытайтесь посчитать по предложенному Вами алгоритму для x=1.5 и n=50.
Число, кстати, получится совсем не большое: 361.1.