قيمة X=0 قبل التكرار وفي أول مرة تكرار تكون قيمة X=2
وبالتالي تكون قيمة المعادلة Y=Y+X تكون تساوي 2
وحضرتك تقدر تتأكد من كلامي بكتابة البرنامج التالي
Dim X, Y, W, Z AsInteger
Z = 5
W = 4
For X = 2 To 4 Step 2
Y = Y + X
W = W - 1
Next
If Y > Z Then
W = W \ 2
Z = Z + Y
MsgBox(W)
MsgBox(Y)
MsgBox(Z)
EndIf

حضرتك المسألة موجودة فيها For z = 2 to 4 step 2 يعنى z هى اللى بتزيد مش x .

2
0
4
---------------------------------

حضرتك كاتب في الامتحان العداد z مش x

ياجماعه انا معيد ف كليه الحاسبات واجابه السوال الأخير ف ماده الحاسب الالى لتالتهاعدادى محافظه الدقهيله هى وده كمان بعد تنفيذ البرنامج على الجهاز عمليا وهى
1 - قيمة المتغير W = 2
2- قيمة المنتغير y = 0
3- قيمة المتغير Z = 6 وهىالقيمة التى يتوقف عندها التكرار
واى حد يقول اى اجابه تانيه تبقى غلط

كل الحكايه ان الأستاذ واضع الإمتحان حب يتفزلك شويه على العيال وهو عارف تماما ان دوووول طلبه اعدادى يعنى من اساسه برمجه الدوت نت صعبه عليهم جدا اذا كانت هى صعبه على طالب الجامعه يبقى طالب الأعدادى يعمل ايه

ولو كان عاوز يريح الكل كان المفترض يخلى الشرط الموجود بعد كلمه next يكون true ف الحاله ده كان كله حلها صح الطلبه وكمان المدرسين كانوا زمانهم اتفقوا على اجابه واحده بدل البلبله ال حصلت بين المدرسين ف اجابه السوال ده . ارجو التعليق على كلامى

يا باشمهندس منهج 3 إعدادي بسيط جداً بالذات بعد الحذف بقى في مستوى أولى ابتدائي

يعني لوقلت القواعد كدة يبقى غلط
الايبدا برقم
الايحتوى على رموز خاصة
الايحتوى على كلمة محجوزة

انا لحد الوقتى معرفش الاجابة النهآئية ايه للسؤال الاخير ؟!!!

الغلطة كلها فى ان الاستاذ الى نقل الامتحان نقله غلط والصح هو
For X = 2 To 4 Step 2
ليس
For z = 2 To 4 Step 2

ولهذا فان الاجابة الصحيحة هى

1- قيمة المتغير W هي 1
2-- قيمة المتغير Y هي 6
3- قيمة المتغير Z هي 11

وهو ده البرنامج الى جه فى الامتحان وجربه على vb.net

Dim X, Y, W, Z As Integer
Z = 5
W = 4
For X = 2 To 4 Step 2
Y = Y + X
W = W - 1
Next
If Y > Z Then
W = W \ 2
Z = Z + Y
End If
MsgBox(W)
MsgBox(Y)
MsgBox(Z)
End Sub

المسألة كده سهلة
الخلاف كان على العداد عندما كان z

ويوجد مسألة مشابهة لها فى نماذج الوزارة

اتمنى التوفيق للجميع الطلبة

يا جماعه
for x=2 to 4