All pastes #190900 Raw Edit

Brandon G

public text v1 · immutable
·published 2006-10-04 12:46 UTC
rendered paste body
View.Set ("graphics:max,max")

function InToCm(inch,centi:real):real

loop
put "Enter a measurement to be converted from inches to centimeters.."
get inch
centi:= inch *  2.54
put "Your measurement is ", inch, " converted into centimeters, it is ", centi

end loop

end InToCm