Ethiopian multiplication: Difference between revisions

(→‎{{header|VBScript}}: Change sub-headings to bold as this shortens table of contents.)
Line 1,714:
temp := temp + plicand;
end if;
exit when plier <= 1;
plier := half(plier);
plicand := double(plicand);
exit when plier <= 1;
end loop;
 
temp := temp + plicand;
 
return temp;
Anonymous user