3x+3=15という方程式の解を出すものです
C++でもいいのですが、変数の定義がめんどくさいのでHSPにしました。
。
screen 0,300,50 cls 4 color 225,0.0 mes "3x+3=15" V1=3 x=0 V2=3 V3=15 cn=0 button "解く" , *ss stop *ss screen 0,300,480 cls 4 *main color 0,225,0 cn=cn+1 V4=V1*x V5=V4+V2 if V5=V3 : goto *owari x=x+1 mes "TAKE"+cn+":"+x+"" wait 100 goto *main *owari color 225,0,0 mes "解は X="+x+" <〜ここまで> です。 まあ、重要な部分はここですね V1=3 x=0 V2=3 V3=15 *main V4=V1:x V5=V4+V2 if V5=V3 : goto *owari X=x+1 goto *main *owari mes "X=""+x+"" <pre/> あとコピペしただけなんですけどスペースのところがquotになってます。すみません