rootGUITest.frink

View or download rootGUITest.frink in plain text format

numstr = "10000"
rootstr = "2"
message = "Find roots of a number"

while [numstr, rootstr] = results = input[message, [["Number", numstr], ["Root", rootstr]]]
{
   [num, root] = eval[results]
   val = num^(1/root)
   message = "$numstr^(1/$root) = $val"
   println[message]
}


View or download rootGUITest.frink in plain text format


This is a program written in the programming language Frink.
For more information, view the Frink Documentation or see More Sample Frink Programs.

Alan Eliasen was born 17645 days, 8 hours, 42 minutes ago.