Anonymous user
Sorting algorithms/Bubble sort: Difference between revisions
→{{header|Fortran}}
Line 1,253:
REAL :: temp
INTEGER :: i, j
LOGICAL :: swapped
DO j = SIZE(a)-1, 1, -1
Line 1,268:
END DO
END SUBROUTINE Bubble_Sort</lang>
=={{header|Go}}==
Per task pseudocode:
| |||