Skip to content

Instantly share code, notes, and snippets.

@ezfe

ezfe/program.txt

Created December 8, 2015 03:09
Show Gist options
  • Save ezfe/8edd69968fabebf888fa to your computer and use it in GitHub Desktop.
Save ezfe/8edd69968fabebf888fa to your computer and use it in GitHub Desktop.
Download ZIP
Raw
program.txt
ClrAllLists
ClrHome
Prompt N
Prompt A
Prompt B
Input "Y₁=?",Str1
Str1→Y₁
(B-A)/N→H
For(I,1,N)
A+I*H→X
Y₁*H→L₁(I)
A+(I-1)*H→X
Y₁*H→L₂(I)
A+(I-.5)*H→X
Y₁*H→L₃(I)
End
ClrHome
Output(1,1,"LRAM")
Output(2,1,sum(L₁))
Output(3,1,"RRAM")
Output(4,1,sum(L₂))
Output(5,1,"MRAM")
Output(6,1,sum(L₃))
Pause ""
ClrHome
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment