ضرب تقسیم
ضرب دو عدد بدون استفاده از عملگر ضرب
cls
INPUT a, b
FOR i = 1 TO a
sum = sum + b
NEXT
PRINT sum
END
تقسیم دو عدد بدون استفاده از عملگر تقسیم ( تقسیم های صحیح و بدون اعشار )
cls
input n,m
while n>=m
n=n-m
y=y+1
wend
print y
end