程序正常，但结果有误

Fnewhand

[Fortran] 纯文本查看 复制代码

program ex0611

    implicit none 
    integer i 
    integer strlen 
    integer,parameter::key =2
    character (len =20)::string 
    write (*,*)"String"
    read (*,*)string 
    strlen =len_trim(string)
    do i =1,strlen 
        string (i:i)=char (ichar(string(i:i))+key)
    end do 
    write (*,"('Encoded:',a20)")string 
    stop
    end

该程序为加密程序。输入的字符中如果有空格，就会在第一个空格中断，这样就不能加密一个句子？怎么回事

Fnewhand

谢谢。这是跟默认值有关系吗。默认值不足？但是好像按原来的程序，只输入两个字母，中间一个空格，它还是只显示第一个字母？

Fnewhand

哦，明白，有学到一个