[نهال أاحمد]

ممكن حل هذه المساله
dim a,b,c as integer
b=10
c=b/2
for a=6 to 3 step -3
b=b-1
c=c-1
next
msgbox (a
msgbox (b
msgbox (c