الگوریتم جدول ضرب qbasic .

سلام اگر کسی بتونه الگوریتم جدول ضرب 10*10 در qbasic با دو حلقه do while and for next برام بنویسه متشکر میشم.

cls
for i=1 to 10
for j=1 to 10
print i*j;
next j
print
next i

این با حلقه for اگر ترکیبی از دو حلقه را خواسته باشی روال کار به همین شکله فقط حلقه عوض می شه .

سلام
بهتر نبود کدها را درون تگ کد مینوشتی ؟
به شکل زیر

cls

i=1 :j=1

do while i<=10

    do while j<=10

       print i*j;

       i=i+1

       j=j+1

    loop

    print

loop