درخواست کمک برای یک برنامه ی ساده

[M i L @ D]

سلام دوستان ...

یه سوال داشتم ... چطور میشه با استفاده از حلقه های DO While و Do Until یک عدد رو بگیریم و مقسوم علیه های آن را چاپ کنیم ...

ممنون میشم کمک کنید ! :11:

[roya_borhany]

i=1
n= val(text1.text)
while n<=n do
if n mod i = 0 then
print i
end if
i=i+1
loop