Èíôîðìàòèêà
Ìîäèôèêàöèÿ àëãîðèòìà óïîðÿäî÷åíèÿ ÷èñåë, ðàçìåùàåìûõ
îò k = 1 äî N öèêë for k = 1 to N
i := L(k) i = L(k)
âûâîä (tv(i),c(i),p(i)) ? tv$(i);c(i);p(i)
êöèêë next k
êîí return
Ìîäèôèêàöèÿ àëãîðèòìà óïîðÿäî÷åíèÿ ÷èñåë, ðàçìåùàåìûõ â ìàññèâå x[l:N], ñ ó÷åòîì ïåðåñòàíîâîê çíà÷åíèé â ìàññèâå èíäåêñîâ L[1:N] ïîëó÷àåò ñëåäóþùèé âèä:
àëã «ñîðòèðîâêà ìàññèâà» sortmas: 'ñîðòèðîâêà ìàññèâà
íà÷ '
îò k = 1 äî N-1 öèêë for k = 1 to N-1
xmn := x(k) xmn = x(k)
imn := k imn = k
îò i = k + 1 äî N öèêë for i = k + 1 to N
åñëè x(i) < xmn òî if x(i) < xmn then
xmn := x(i) xmn = x(i)
imn := i imn = i
êåñëè end if
êöèêë next i
Imn := L(imn) Imn = L(imn)
xmn := x(imn) xmn = x(imn)
L(imn) := L(k) L(imn) = L(k)
x(imn) := x(k) x(imn) = x(k)
L(k) :=Imn L(k) = Imn
Forekc.ru
Ðåôåðàòû, äèïëîìû, êóðñîâûå, âûïóñêíûå è êâàëèôèêàöèîííûå ðàáîòû, äèññåðòàöèè, ó÷åáíèêè, ó÷åáíûå ïîñîáèÿ, ëåêöèè, ìåòîäè÷åñêèå ïîñîáèÿ è ðåêîìåíäàöèè, ïðîãðàììû è êóðñû îáó÷åíèÿ, ïóáëèêàöèè èç ïðîôèëüíûõ èçäàíèé