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

6 lines
163 B
Plaintext

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-