يسرنا في هذه المقالة الجديدة من مقالات موقع المكتبة التعليمية ان نطرح لكم سؤالا جديدا من اسئلة الوحدة السادسة: “البرمجة بلغة (فيجول بيسك ستوديو)” من كتاب الحاسب الالي للصف الأول الثانوي الفصل الدراسي الثاني وهو:
اكتب برنامجاً باستخدام (فيجول بيسك) يقوم لإدخال (10) أعداد ثم طباعة العدد الأكبر منها، وذلك عن طريق:
-تصميم نموذج واجهة البرنامج.
-تحديد الخصائص لكل أداة وضعتها على النموذج.
-كتابة أوامر البرنامج.
-تنفيذ البرنامج.
وبعد البحث والاستقصاء تمكنا طلابنا الاعزاء ان نجد الاجابة الصحيحة لهذا السؤال لنقدمها لكم عبر موقعنا المميز حيث تتمثل في التالي:
اسم الأداة | الخاصية | القيمة |
Button1 | Text | اضغط لإدخال الاعداد |
Label1 | Text | “فارغ” |
الكود
Dim g(10), count, max As Integer
For count = 0 To 9
g(count) = InputBox(“أدخل عشر أعداد”)
Next
max = 0
For g(count)>max Then
Max = g(count)
End If
Next
Label1.Text = max
التنفيذ: