Вопрос по информатике:

Составить блок-схему для программы упорядочивания элементов массива в QBasic.
RANDOMIZE TIMER
CLS
INPUT "n=", n
DIM a(n)
FOR i = 1 TO n
PRINT "a";
INPUT ":", a(i)
NEXT
FOR i = 1 TO n - 1
min = a(i): k = i
FOR y = i TO n
IF a(y) < min THEN min = a(y): k = y
NEXT
SWAP a(k), a(i)
NEXT
FOR i = 1 TO n
PRINT a(i);
NEXT