Ethiopian multiplication: Difference between revisions

Content added Content deleted
(Add Draco)
m (→‎{{header|Nascom BASIC}}: Little corection: formal parameter instead of global variable.)
Line 1,013: Line 1,013:
20 DEF FND(A)=2*A
20 DEF FND(A)=2*A
30 DEF FNH(A)=INT(A/2)
30 DEF FNH(A)=INT(A/2)
40 DEF FNE(A)=X-INT(X/2)*2-1
40 DEF FNE(A)=A-INT(A/2)*2-1
50 X=17
50 X=17
60 Y=34
60 Y=34