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

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة elsqa

الى الاستاذ/ سيف سالم و الاستاذ/احمد قرنى

ارجوا الافادة بليييييييييييييييييييييييييييييييييييييييييييييييي ييييييييييييييييييييييييييييييييز

ورد فى كتاب الوزارة ص2 ان تعريف المتغيرات هو (
اذا كانت القيم المخزنة تتغير اثناء تشغيل البرنامج فإن اسماء الخلايا التى تشغله هذه القيم يطلق عليها متغيرات variables. ) يعنى المتغيرات هو اسم يطلق على الخلايا
وورد فى احد الاسئلة من موقع الوزارة فى اسئلة صح و خطاء
المتغيرات هى قيم مخزنة تتغير اثناء البرنامج

ارجوا التوضيح
هل المتغيرات هى اسماء الخلايا
ام المتغيرات هى القيم
مشكوووووووووووووووووووووووووووووووووووور

المتغيرات لها اكثر من تعريف وكلهم بمعنى واحد كالاتى

المتغيرات هى الخلايا التى تحمل قيم تتغير اثناء تشغيل البرنامج
المتعيرات هى اسماء الخلايا التى تحمل قيم تتغير
المتغيرات هى المخازن التى تحمل قيم تتغير
المتغيرات هى القيم التى تتغير ( المتغيرة )

بينما عملية إعطاء اسماء للخلايا التى تحمل قيم متغيرة تسمى ( إعلان المتغيرات )

[tefa46]

ارجو من الاساتذة الافاضل توضيح حل mod مع اضافة اساله عليها لتوضيح ارجو الشرح

[Dr.Noha Sami]

اكمل
................ هى اوامر تتحكم فى اعادة تنفيذ عمل معين او مجموعه من الاوامر حتى يتحقق شرط معين

اعد ترتيب الخطوات الاتيه
1- Total =Total +1
2-MsgBox(Total)
3- next
4-for I =1 to 20 step 2
5-Dim I,Total As integer

[أحـمد قرنى]

أوامر التكرار هى اوامر تتحكم فى اعادة تنفيذ عمل معين او مجموعه من الاوامر حتى يتحقق شرط معين

اعد ترتيب الخطوات الاتيه
1- Dim I,Total As integer[/quote]
for I =1 to 20 step 2
3- Total =Total +1
4-next
5-MsgBox(Total)

[Dr.Noha Sami]

Dim R as integer
Dim Total as integer
For R=1 to 8 step 2
Total =total +R
Next
Msg box (total)
اكتب القيمه النهائيه للمتغير total

[أحـمد قرنى]

المشاركة الأصلية كتبت بواسطة صفا2010

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 اقل من القيمة النهائية يتم التكرار
Toal =Total + R بالتعويض عن قيمة Total = 0 وقيمة R = 1 فتكون قيمة Total = 1

- قيمة R = 3 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
Toal =Total + R بالتعويض عن قيمة السابقة Total = 1 وقيمة R = 3 فتكون قيمة Total =4


- قيمة R = 5 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
Toal =Total + R بالتعويض عن قيمة السابقة Total = 4 وقيمة R = 5 فتكون قيمة Total =9


- قيمة R = 7 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
Toal =Total + R بالتعويض عن قيمة السابقة Total = 9 وقيمة R = 7 فتكون قيمة Total =16

- قيمة R = 9 أكبر من القيمة النهائية يتوقف التكرار

من السابق تكون القيمة النهائية R = 9 والقيمة النهائية Total = 16

[Dr.Noha Sami]

المشاركة الأصلية كتبت بواسطة أحـمد قرنى

- قيمة r = 1 اقل من القيمة النهائية يتم التكرار
toal =total + r بالتعويض عن قيمة total = 0 وقيمة r = 1 فتكون قيمة total = 1

- قيمة r = 3 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
toal =total + r بالتعويض عن قيمة السابقة total = 1 وقيمة r = 3 فتكون قيمة total =4


- قيمة r = 5 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
toal =total + r بالتعويض عن قيمة السابقة total = 4 وقيمة r = 5 فتكون قيمة total =9


- قيمة r = 7 لان العداد يزيد بمقدار 2 اقل من القيمة النهائية يتم التكرار
toal =total + r بالتعويض عن قيمة السابقة total = 9 وقيمة r = 7 فتكون قيمة total =16

- قيمة r = 9 أكبر من القيمة النهائية يتوقف التكرار

من السابق تكون القيمة النهائية r = 9 والقيمة النهائية total = 16

شكراااااااااا جدا يا استاذ احمد على اجابة حضرتك

[ماجدة عمرو]

Dim n, k, c As Integer

c = 6
For n = 1 To 6 Step 3
k = k + n
Next
If n > c Then

c = c + 1
End If

قيمة المتغير c =
ناتج N>c هو
قيمة المتغير k =

[ابو محمد 2]

المشاركة الأصلية كتبت بواسطة ماجدة عمرو

Dim n, k, c As Integer

c = 6
For n = 1 To 6 Step 3
k = k + n
Next
If n > c Then
c = c + 1
End If

قيمة المتغير c =
ناتج N>c هو

قيمة المتغير k =

وقيم المتغير n
( 1 ، 4 ، 7 )
وقيم k
( 1 ، 4 ) = ( 1+4 ) = 5
- ناتج N>c هو true لتحقق الشرط
وبالتالي
c = c + 1
6+1 = 7

اذن قيمة المتغير c = 7

[المايسترو mmed]

لا اله الا الله محمد رسول الله

[zalabawy]

هل char متغير حرفي ؟؟؟

[alialy69]

ما نتيجة تنفيذ العملية الاتية:مع الشرح
999mod 1000

[ابو محمد 2]

المشاركة الأصلية كتبت بواسطة alialy69

ما نتيجة تنفيذ العملية الاتية:مع الشرح
999mod 1000

الناتج = 999
حيث إذا كان الرقم الذي قبل mod أصغر من القيمة بعد Mod يكون هو نفس الرقم
أما مثلا
14mod 5
يكون الناتج 4
حيث نقسم 14 على 5 يكون فيها 2 ثم نضرب 2 * 5 يكون 10 وقوم بطرح 14-10 يكون الباقي 4
ومثال 20mod5 يكون صفر حيث لا يوجد باقي من عملية القسمة

[ahmed a e]

السؤال الاول


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

السؤال الثانى

Dim R As integer
Dim total As integer

For R =1 to 8 step 2

Total=Total+R

NEXT

MSG BOX TOTAL

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

[ماجدة عمرو]

المشاركة الأصلية كتبت بواسطة 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