Anonymous user
Ethiopian multiplication: Difference between revisions
→{{header|Liberty BASIC}}
No edit summary |
|||
Line 1,123:
Loop
product = (product + y)
If (x < 0) Then product = (product * -1)
Print msg$ + str$(product)
|
No edit summary |
|||
Line 1,123:
Loop
product = (product + y)
If (x < 0) Then product = (product * -1)
Print msg$ + str$(product)
|