سؤال خطير جدا اختلف عليه اكثر المدرسين
 

ارسم خريطة تدفق لطباعة الاعداد الفردية من واحد الي عشرة ماعدا العدد سبعة

Start
n=1
Is n <=10
Yes
is n=7yes سهم يروح علي المعادله ولو no سهم يروح علي الطباعه n
والمعين الاول لو no سهم يروح end

dim n as integer
n= 1
dowhile n <=10
for n = 1 to 10
(msgbox(n
next
loop
مع تحياتى أحمد شريف 01110968999

آسف

كود Do هيكون
Dowhile n <> 7

Dim n As Integer
n = 1
Do While n <> 7
MsgBox(n)
n = n + 2
Loop
For n = 9 To 10 Step 2
MsgBox(n)

Next
:av4056bb7jp3::av4056bb7jp3::022yb4::022yb4: