Даны действительное число а, натуральное число n. Вычислить:
P=a(a-n)(a-2n)*...*(a-n2).
n2- n в квадрате
Всё очень просто, считаешь циклом:
writeln ('enter a,n');
readln (a,n);
p:=a;
for i:=1 to n do
begin
p:=p*(a-i*n);
end;
nicetyy, возможно ты имела в виду
P = a(a - n)*(a - n^2)*(a - n^3)*...*(a - n^n)
?
а чем такой вариант лучше приведенного в задании nicetyy?
Я просто сначала вообще не понял что она имела в виду, теперь понятно