PRINT
PRINT "静止衛星の高度は ３５７８６ ｋｍ です。"
PRINT "静止衛星の速さは   ３０７５ ｍ/秒 です。"
PRINT
INPUT PROMPT "人工衛星の高度？ （ ｋｍ ） ":h
PRINT
LET v=SQR(10^13*6.6743*5.9722/((h+6378)*10^3) )
PRINT "スピード  ";v;"m/s"
PRINT "         ";3.6*v;"km/hr"
PRINT
END