Sorting algorithms/Bubble sort: Difference between revisions
Content added Content deleted
Basicgames (talk | contribs) Tag: Manual revert |
(→{{header|QuickBASIC}}: Little optimization.) |
||
| Line 1,669: | Line 1,669: | ||
' Sort |
' Sort |
||
counter = size |
|||
DO |
DO |
||
changed = 0 |
changed = 0 |
||
FOR I = 1 TO |
FOR I = 1 TO counter - 1 |
||
IF nums(I) > nums(I + 1) THEN |
IF nums(I) > nums(I + 1) THEN |
||
tmp = nums(I) |
tmp = nums(I) |
||
| Line 1,679: | Line 1,680: | ||
END IF |
END IF |
||
NEXT I |
NEXT I |
||
counter = counter - 1 |
|||
LOOP WHILE (changed) |
LOOP WHILE (changed) |
||
'Display result |
' Display result |
||
PRINT "After: "; |
PRINT "After: "; |
||
FOR I = 1 TO 10 |
FOR I = 1 TO 10 |
||