Предмет:
ИнформатикаАвтор:
gloriaberryАвтор:
anton8tggАвтор:
davidthomasОтвет:
Var X,p,s,i,n:integer;
F:real;
Begin
Read(x,n);
For i:=1 to n do
Begin
P:=p*x;
S:=s+i;
F:=f+p/s
End;
Write(f);
End.
----
P=1
S=0
F=0
N= int(input())
x= int(input())
for i in range(1,N):
P=P*x
S=s+i
F:=f+p/s
print(f)
Автор:
francoДобавить свой ответ
Предмет:
ГеометрияАвтор:
nelliestrongОтветов:
Смотреть
Предмет:
МатематикаАвтор:
caseyterryОтветов:
Смотреть