Вычислить и распечатать значение функции z = x^k/k^2, большие e если k = 1,2,
151
225
Ответы на вопрос:
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.
Популярно: Информатика
-
darina2003401.09.2022 18:12
-
lemurec07.05.2020 08:35
-
danchik0014805.04.2023 17:28
-
mmmdz16.08.2021 16:33
-
курма411.08.2022 22:10
-
katarinka37726.03.2021 11:37
-
zaharsteam25.05.2021 21:20
-
flinko401.09.2021 22:43
-
Adilka1119.02.2022 07:11
-
ДимаБум23.02.2022 05:43