rank.txt

来自「常用的数值算法的VB程序」· 文本 代码 · 共 5 行

TXT
5
字号
Sub RANK(N, INDX(), IRANK())
    For J = 1 To N
        IRANK(INDX(J)) = J
    Next J
End Sub

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?