TI-BASIC, 27 bytes

Prompts user for input and displays output on termination. Note: ⁻¹ is the ^-1 (inverse) token.

Input N
1
Repeat 2N≤Σ(I⁻¹,I,1,Ans
Ans+1
End
Ans

#TI-BASIC, 27 bytes

Prompts user for input and displays output on termination. Note: ⁻¹ is the ^-1 (inverse) token.

Input N
1
Repeat 2N≤Σ(I⁻¹,I,1,Ans
Ans+1
End
Ans

Prompts user for input and displays output on termination. Note: ⁻¹ is the ^-1 (inverse) token.

Input N
1
Repeat 2N≤Σ(I⁻¹,I,1,Ans
Ans+1
End
Ans

Ans optimizations and better output

Source Link

edited Jan 31, 2018 at 5:20

#TI-BASIC, 3027 bytes

TakesPrompts user for input in Ans and storesdisplays output in Anson termination. Note: ⁻¹ is the ^-1 (inverse) token.

Ans→NInput N
1→M1
Repeat 2N≤Σ(I⁻¹,I,1,MAns
M+1→MAns+1
End
Ans

#TI-BASIC, 30 bytes

Takes input in Ans and stores output in Ans. Note: ⁻¹ is the ^-1 (inverse) token.

Ans→N
1→M
Repeat 2N≤Σ(I⁻¹,I,1,M
M+1→M
End

#TI-BASIC, 27 bytes

Prompts user for input and displays output on termination. Note: ⁻¹ is the ^-1 (inverse) token.

Input N
1
Repeat 2N≤Σ(I⁻¹,I,1,Ans
Ans+1
End
Ans

Source Link

created Jan 27, 2018 at 22:21

#TI-BASIC, 30 bytes

Takes input in Ans and stores output in Ans. Note: ⁻¹ is the ^-1 (inverse) token.

Ans→N
1→M
Repeat 2N≤Σ(I⁻¹,I,1,M
M+1→M
End

Return to Answer