Ethiopian multiplication: Difference between revisions
Content added Content deleted
No edit summary |
|||
Line 1,123: | Line 1,123: | ||
Loop |
Loop |
||
product = (product + y) |
product = (product + y) |
||
If (x < 0) Then product = (product * -1) |
|||
Print msg$ + str$(product) |
Print msg$ + str$(product) |
||