يسرنا في هذه المقالة الجديدة من مقالات موقع المكتبة التعليمية ان نطرح لكم سؤالا جديدا من اسئلة الوحدة السادسة: “البرمجة بلغة (فيجول بيسك ستوديو)” من كتاب الحاسب الالي للصف الأول الثانوي الفصل الدراسي الثاني وهو:

اكتب برنامجاً باستخدام (فيجول بيسك) يقوم لإدخال (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

التنفيذ:

اكتب برنامجاً باستخدام (فيجول بيسك) يقوم لإدخال (10) أعداد ثم