- 216 名前：デフォルトの名無しさん mailto:sage [2007/01/25(木) 17:08:03 ]
- 十進BASICはこれで動いた。意図する式かどうかは
Let I=1.33
Let L=1
Let E=0.0008
Input PROMPT "Ｃを入力してください。":C
Input PROMPT "Ｒを入力してください。":R
For t=1 to 2500
LET V=E/1000*(I*(t/C*L+R*L/3-2*R*l/PI^2*(1/1^2/EXP(1^2*PI))))^2*t/R/C/L^2+1/2^2/EXP(2^2*PI^2*s/R/C/L^2)+1/3^2/EXP(3^2*PI^2*t/R/C/L^2)
Print V
NEXT t
END
