PRINT
PRINT "バネの伸び   L=g*m/k"
PRINT "バネ定数  k=10 くらい"
PRINT
INPUT PROMPT "バネ定数は？ ":k
INPUT PROMPT "ぶら下げる重りの質量？ ":m
PRINT
LET g=9.80665
LET L=g*m/k
PRINT "伸び ＝";L;"ｍ"
PRINT
END