سيتوقف التكرار هنا عندما تكون قيمة X = 5 لأن في هذا الوقت سيكون قيمة الشرط X < 5 سيكون False وبالتالي آخر قيمة لـ X هي 4 (خطأ ) وقيمة( Sum = ( 1 + 2 + 3 + 4 اي 10 Average = Sum / x 2.5 = 4 / 10
وبافتراض 2.5 هتكون 2 برضه ليه
Dim x , sum as Integer
2.5 كسووووور
قابل للمناقشه