انت تسأل وجميع الاساتذة تجيب

[ماجدة عمرو]

المشاركة الأصلية كتبت بواسطة ahmed a e

السؤال الاول

for A = 2 to 6 step 2
احسب عدد مرات التكرار موضحا قيمة A النهائية
عدد مرات التكرار 3
قيمة A النهائية 8
السؤال الثانى

Dim R As integer
Dim total As integer

For R =1 to 8 step 2

Total=Total+R

NEXT

MSG BOX TOTAL

احسب قيمة TOTAL النهائية مع توضيح الخطوات

نعمل جدول قيمR هى 1 و3 و 5 و 7و9
قيم الـ Total هى 1و4 و9 و 16 اى ان الفيمة النهائبة لـ total هى 16