Bubble sort

built by teacher Quan

  1. 1DECLARE Num : ARRAY[1:4] OF INTEGER
  2. 2DECLARE Pass : INTEGER
  3. 3DECLARE Index : INTEGER
  4. 4DECLARE Temp : INTEGER
  5. 5FOR Pass ← 1 TO 3
  6. 6 FOR Index ← 1 TO 4 - Pass
  7. 7 IF Num[Index] > Num[Index + 1] THEN
  8. 8 Temp ← Num[Index]
  9. 9 Num[Index] ← Num[Index + 1]
  10. 10 Num[Index + 1] ← Temp
  11. 11 ENDIF
  12. 12 NEXT Index
  13. 13NEXT Pass