主页 / 问题 / 593656
Accepted
Ivan Stasiuk
Asked:2020-11-21 07:51:07 +0000 UTC2020-11-21 07:51:07 +0000 UTC

将 BASIC Loop 转换为 Python

  • 772

一切看起来都很简单，但有些事情并没有想到一个正常的解决方案。基本代码：

M = 5
KTR(2 * M, 2 * M)
FOR i = 1 TO M - 1: FOR j = i + 1 TO M: KTR(i, j) = 1

蟒蛇代码：

M = 5
KTR = [[None] * (2 * M), [None] * (2 * M)]
z = 1
z1 = z + 1
for i in range(M - 1):
    for i1 in range(M):
        KTR[0][z] = 1
        KTR[1][z1] = 1
        z = z + 1
        z1 = z1 + 1

但是，总是有越界调用。告诉我我做错了什么。这不是学校或大学的问题，我希望将程序重新制作成另一种语言。

python-3.x

2 个回答

  1. Best Answer

    BASIC代码直译

    FOR i = 1 TO M - 1创建一个循环，遍历从 1 到M-1 inclusive的所有值。

    在 Python 中，这可以写成for i in range(1, m). 请注意，它不包括右边框，因此两个循环绕过range()相同的值。EW Dijkstra 解释了（在 1982 年）为什么不应包括右边界。i

    KTR(2 * M, 2 * M)声明一个KTR包含2*M+1行和2*M+1列的表（如果这个构造像1964 BASIC 手册DIM A(17)中描述的那样工作）。

    在 Python 中，不声明变量。相反，一个对象（例如，一个列表）使用分配符号分配一个名称（在示例中）：ktr

    ktr = [[None] * (2 * m + 1) for _ in range(2 * m + 1)]

    尽管 BASIC 允许从零开始索引，但习惯上像A(1)BASIC 一样引用列表中的第一个元素，而不是A[0]Python。手册明确说A(7)这是第七个元素，而不是索引从零开始的语言中习惯的第八个元素（A[7]这是 Python 中的第八个元素）。

    对此，将BASIC代码直译成Python：

    m = 5
ktr = [[None] * (2 * m + 1) for _ in range(2 * m + 1)]
for i in range(1, m):
    for j in range(i + 1, m + 1):
        ktr[i][j] = 1

    可能无法反映编写 BASIC 代码的程序员的实际意图。

    实现BASIC 代码的 [可能]意图

    如果打算创建一个m对角线为零的上三角矩阵：

    m = 5
ktr = [[int(i < j) for j in range(m)] for i in range(m)]

    在这里它像True == 1在False == 0Python 中一样使用。

    或使用numpy.triu()：

    import numpy as np

m = 5
ktr = np.triu(np.ones((m, m), dtype=int), 1)

    ktr

    [[0 1 1 1 1]
 [0 0 1 1 1]
 [0 0 0 1 1]
 [0 0 0 0 1]
 [0 0 0 0 0]]

    [程序员的] BASIC代码的另一个[可能]意图的实现

    要创建2m x 2m一个用零初始化的矩阵并用一个填充对角线上方的上三角四分之一：

    m = 5
ktr = [[0] * (2 * m) for _ in range(2 * m)]
for i, row in enumerate(ktr[:m - 1]):
    row[i + 1:m] = [1] * (m - i - 1)

    假设在您的情况下，BASIC 索引来自一个，而 for-to 循环包括两个边界。

    要清楚，这里是相同的，使用numpy 数组：

    import numpy as np

m = 5
ktr = np.zeros((2 * m, 2 * m), dtype=int)
ktr[np.triu_indices(m, 1)] = 1

    ktr

    [[0 1 1 1 1 0 0 0 0 0]
 [0 0 1 1 1 0 0 0 0 0]
 [0 0 0 1 1 0 0 0 0 0]
 [0 0 0 0 1 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]
 [0 0 0 0 0 0 0 0 0 0]]
    • 3

  2. 在 BASIC 中，数组是二维的 10x10，在 Python 中是 2x10。当然不行。

    Python 中的整个循环很容易描述： 

    m=5
KTR = [ [0 if j<i+1 else 1 for j in range(1,m+1) ] for i in range(1,m) ]

    结果： 

    [[0, 1, 1, 1, 1],
 [0, 0, 1, 1, 1], 
 [0, 0, 0, 1, 1], 
 [0, 0, 0, 0, 1]]

    出于某种原因，指定了数组的边界2*M，并且枚举仅达到M- 很可能这是防止超出数组限制的保险：那些用 BASIC 编写的人喜欢这样写。

    然而，这很容易修复。我们将边界扩展到2*M并同时将索引移动 1，因为在 Basic 中第一个数组索引是 1，而不是 0：

    KTR = [[None]*2*m]+[None]+[ [None]+[0 if j<i+1 else 1 for j in range(1,m+1) ]+[0]*m for i in range(1,m) ]+[ [None]+[0]*2*m for k in range(m+1) ]

    结果：

    [[None, None, None, None, None, None, None, None, None, None, None], 
 [None, 0, 1, 1, 1, 1, 0, 0, 0, 0, 0], 
 [None, 0, 0, 1, 1, 1, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0], 
 [None, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0]]

    现在，就像在 BASIC 中一样。

    好吧，一个简单（但无聊）的翻译，因为它是用 Python 从原始 BASIC 翻译过来的：

    m = 5
KTR = [ [0]*(2*m+1) for k in range(2*m+1) ]
for i in range(1,m):
    for j in range(i+1,m+1):
        KTR[i][j] = 1
    • 3

相关问题