Page 76 - أساسيات الحاسب الالي2
P. 76
جمل التحكم الفصل الرابع
يوجد شكلين لهذه الدوارة والفرق بينهما هو متى يتم اختبار الشرط
الشكل اﻷول -:وفيه يتم اختبار الشرط أوﻻ قبل إجراء اﻷوامر فى الدوارة.
Do while condition
Statment1
Statment2
-----
Loop
الشكل الثانى -:وفيه يتم اختبار الشرط بعد إجراء تعليمات البرنامج ولهذا يتم تحقيق هذه
الدوارة مره واحدة على اﻷقل
Do
Statement1
Statement2
Loop while condition
مثال
اكتب برنامج ﻹدخ ال مجموع ة م ن اﻷرق ام م ن خ ﻼل الم ستخدم الم ستخدم حت ى ي دخل
قيمة صفر فيتوقف إدخال القيم ويحسب البرنامج متوسط اﻷرقام المدخلة
)(Sub Main
Dim i, count, sum As Integer
Dim av As Single
i = Console.ReadLine
)Do While (i <> 0
count += 1
٧٦