RosettaCodeData/Task/A+B/ProDOS/a+b-1.dos

6 lines
163 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
editvar /newvar /value=a /title=Enter an integer:
editvar /newvar /value=b /title=Enter another integer:
editvar /newvar /value=c
do add -a-,-b-=-c-
printline -c-