Вычислить и распечатать значение функции Z = X^k/K^2, большие E если K = 1,2,3...40
Вычислить и распечатать значение функции Z = X^k/K^2, большие E если K = 1,2,3...40
Гость
Ответ(ы) на вопрос:
Гостьvar
x, xk: real;
k: integer;
begin
readln(x);
xk := 1;
for k := 1 to 40 do
begin
xk := xk * x;
writeln(k, ' z=', xk / k / k);
end;
end.
Не нашли ответ?
Похожие вопросы