perplexus.info :: Just Math : Cubic Minimum

Cubic Minimum (Posted on 2014-09-26)

S is the minimum positive integer whose cube root is of the form T + U, where T is a positive integer and U is a positive real number less than 0.00001.

Determine the value of S.

No Solution Yet Submitted by K Sengupta

No Rating

Comments: ( Back to comment list | You must be logged in to post comments.)

computer solution

| Comment 3 of 7 |

DefDbl A-Z

Dim crlf$, used(25)

Private Sub Form_Load()

ChDir "C:Program Files (x86)DevStudioVBprojectslooble"

Text1.Text = ""

crlf$ = Chr(13) + Chr(10)

Form1.Visible = True

DoEvents

Min = 0.001

For s = 1 To 10000000

cr = s ^ (1 / 3)

rounded = Int(cr + 0.5)

diff = cr - rounded

If diff > 0 Then

If diff < Min Then

Text1.Text = Text1.Text & s & Str(cr) & crlf

DoEvents

Min = diff

End If

Text1.Text = Text1.Text & crlf & " done"

End Sub

finds, after other, larger U:

S T+U
...

5735340 179.000010403337

5832001 180.000010288065

5929742 181.000010174699

6028569 182.000010063196 last min before answer

6128488 183.000009953516 answer

6229505 184.00000984562

6331626 185.000009739469

6434857 186.000009635025

...

Edited on September 26, 2014, 1:55 pm

Posted by Charlie on 2014-09-26 13:50:49

Please log in:

Login:
Password:
Remember me:

Sign up! \| Forgot password

Search:

Search body:

Forums (0)
Newest Problems
Random Problem
FAQ | About This Site
Site Statistics
New Comments (0)
Unsolved Problems
Top Rated Problems
This month's top
Most Commented On

Chatterbox:


perplexus dot info