string - 在图灵中使数字和字母有效和无效

Question

到目前为止，当您输入字母时，我的数字有效，但我不知道如何使数字有效。我可以帮助使数字和字母一样有效吗？

var var_name : string

function check_letter (ch : string (1)) : int
    if ord (ch) >= 65 and ord (ch) <= 90 then
        result 1
    end if
    if ord (ch) >= 97 and ord (ch) <= 122 then
        result 1
    end if
    if  ord (ch) >= 0 and ord (ch) <= 9 then
        result 1
    end if
    result 0
end check_letter


put "please enter the postal code"
get var_name
for i : 1 .. length (var_name)
    if check_letter (var_name (i)) = 1 then
        put "postal code valid"
    else
        put "postal code invalid"
    end if
end for

Answer 1

（老实说，我很惊讶有人还在使用图灵）

代码中的随机数 ( 65, 90, 97, 122) 是 ASCII 中字母的代码点。数字 0-9 的代码点不是 0-9就像你有它们一样，它们可以在 ASCII 表中找到：

或者，为了让您的代码更简洁，您可以这样做而不是硬编码代码点：

if ord(ch) >= ord('A') and ord(ch) <= ord('Z') then
...