الاسئلة العملى واجباتها والخاصة بالبرامج والاكواد
 

اكتب كود برنامج
أ- لطباعة الأعداد الفردية من 1 إلى 99 باستخدام أمر التكرار Do while … Loop

حذف محتوى صندوق القائمة List Box1

اكتب برنامج لحساب الراتب الاسبوعي لموظف بشرط لو كانت ساعات عمل الموظف أقل من أو تساوي 30ساعة فإن أجر الساعة يكون 4 جنيه ، أما لوكانت ساعات العمل أكثر من 30 ساعة فإن الراتب يتم حسابه كالأتي :
أ‌- أربعة جنيهات في الساعة لأول 30 ساعة
ب‌- 8 جنيهات في الساعة التي تزيد عن 30 ساعة الأولى حيث أن الراتب يتم حسابه كالتالي :
الراتب الإضافي = 8 X ( ساعات العمل – 30 )
الراتب الإجمالي = 30 X 4 + الأجر الإضافي


إذا أردنا تصميم ساعة رقمية بإستعمال الكائن Timer تعلن عن الوقت و التاريخ الحالى :-
- إكتب معالج الحدث للميقاتى Timer1 لكى يتم ظهور الوقت و التاريخ الحالى لساعة النظام على الأداة LblCurrentTime


1) إكتب كود البرمجة الذى يظهر الرسالة " أنت مقبول فى كلية الحاسبات " حسب المعطيات التالية :
- إذا كانت درجة الطالب فى مادة الرياضيات Math أكبر من او تساوى 90 درجة يتم إظهار الرسالة

إذا كانت درجات الطالب أقل من ذلك تكون خلفية الأداة -LblResult حمراء Red
اكتب معالج الحدث للزر Button1 .

موظف يتقاضي مرتب شهري Salary ويعمل ساعات اضافيه Overtime فاذا كان المرتب وقيمه الساعات الاضافيه Total اكبر من او يساوي 2000 تكون الضرائب Tax بنسبه 15% والا تصبح الضرائب 10%

المطلوب :
اكتب الكود البرمجي الذي يحقق اجمالي المرتب ونسبه الضرائب وصافي الدخل الشهري Netsalary

اكتب برنامج لحساب الراتب الاسبوعي لموظف بشرط لو كانت ساعات عمل الموظف أقل من أو تساوي 30ساعة فإن أجر الساعة يكون 4 جنيه ، أما لوكانت ساعات العمل أكثر من 30 ساعة فإن الراتب يتم حسابه كالأتي :
أ‌- أربعة جنيهات في الساعة لأول 30 ساعة
ب‌- 8 جنيهات في الساعة التي تزيد عن 30 ساعة الأولى حيث أن الراتب يتم حسابه كالتالي :
الراتب الإضافي = 8 X ( ساعات العمل – 30 )
الراتب الإجمالي = 30 X 4 + الأجر الإضافي

الاجابه

if hoursWorked<=30 then

salary =4*hoursWorked

overtime=8*(hoursWorked-30)
salary =4*30+overtime
end if


2_حذف محتوى صندوق القائمة List Box1

الاجابه

listbox1.items.clear

موظف يتقاضي مرتب شهري Salary ويعمل ساعات اضافيه Overtime فاذا كان المرتب وقيمه الساعات الاضافيه Total اكبر من او يساوي 2000 تكون الضرائب Tax بنسبه 15% والا تصبح الضرائب 10%

المطلوب :
اكتب الكود البرمجي الذي يحقق اجمالي المرتب ونسبه الضرائب وصافي الدخل الشهري Netsalary


الاجابه


total=salary +overtime

if total >=2000 then

tax =total *0.15

netsalary =total -tax
else

tax =total *0.10

netsalary =total-tax



msgbox(total,tax,netsalary)

end if

وشكرل لاستاذ محمد على الاسئله ولحضرتك علىالموضوع

ودى اللى انا اجبت عليها دلوقتى بس عشان الوقت
ولوفى اى غلط ياريت الاستاذمحمد يصلحهولى

وشكرا

السلام عليكم
يا ريت أ/ محمد والكلام موجه أيضا للأمورة بنان أن يوضع هذا الكلام الجميل في ملف وكدا ندعي لكما أكثر.......جزاكم الله خيرا

شكرا يا امورة ياريت حل السؤال رقم 1 وهل فى حله تحويل ام لا ؟

بنان الله واكبر عليكي لو كنتي طالبه الغلطات مش كتير طالبه ولا مدرسه

أسألكم الدعاء

:oشكرا لحضرتك :blush:ورد حضرتك دا شرف لى والله

الغلطات بس انى نسيت اكتب ELSE
واعلن عن المتغيرات عشان كنت بكتب بس بسرعه

لا انا طالبه بالصف الثالث الاعدادى:bosyht9:

وشكرا لحضرتك مرة تانيه

ربنا يحميكي ونشوفك اكبر مبرمجه في مصر

هل الانماط المركبة مثل and or xor ملغية أم مقررة

هل الانماط المركبة مثل and or xor مقررة

فين بقية الاسئلة والمدرسين اللى بيشاركوا مفيش غير الاستاذ محمد ؟

x=1

for m=0 to 7 step 3

x=x*2
next

اوجد قيمة m ؟

اوجد قيمة X ?
بعد اجراء تنفيذ الاوامر والتكرارات.


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

dim x , sum as int
x=1
do while x <= 5
sum = sum+x
x=x+2
loop

س1: الاوامر السابقة تقوم بجمع ( الاعداد الفردية _ الاعداد الزوجية _ الاعداد كلها) اختر؟

س2: يتوقف التكرار للاوامر السابقة عندما تكوون قيمة X = ........ اكمل

ارجو الاجابة السريعة مع خالص تحياتى



منقوله عن العضور succeed student ارجو الحل