Предмет: Информатика,
автор: natashkasharova
Дано натуральное число n.Составьте программу вычисления(ЧЕРЕЗ ВЛОЖЕННЫЕ ЦИКЛЫ ПОЖАЛУУУЙСТА) :(1-1/1^1)*(1-1/2^2)...(1-1/n^n)
Ответы
Автор ответа:
0
uses crt;
var n,i:integer; y:real;
begin
clrscr;
y:=1;
write('n='); read(n);
for i:=1 to n do
y:=y*(1-(1/(exp(ln(n) * n))));
write ('y=',y);
end.
Интересные вопросы
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: slavazabotkina87
Предмет: Алгебра,
автор: ertwiusrfthsftutryio
Предмет: Математика,
автор: Федосия