在巡回演出中使數字和字母有效和無效

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
...