Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › select case 例题

select case 例题

查看数: 757 | 评论数: 4 | 收藏 0

关灯 | 提示：支持键盘翻页<-左右->

帖子模式

kkluv

发布时间: 2024-7-2 18:19

正文摘要:

help, 为什么输出不了我规定的“优秀”和“合格”呢？？

胡文刚 发表于 2024-7-3 08:15:50

本帖最后由胡文刚于 2024-7-3 08:18 编辑

1个汉字是2字节还是3字节，还是4字节。取决于编码方式，对你的问题，我觉得长度定义个20也是OK的。
字符串长度定义要足够，并考虑一定的冗余。

此外，你输出的时候格式符也不能再写 a2 了，就只写 a 就行了。
write(*,"('Grade:',a)") trim(grade)

顺便说，发帖的时候代码直接复制粘贴文本就行了，干嘛要截图呢？截图都不能复制其中的代码片段。

Transpose 发表于 2024-7-3 08:07:25

好像记错了,一个汉字是3个,改成character(len=6)然后最后的格式也要改成a6

kkluv 发表于 2024-7-2 22:40:10

Transpose 发表于 2024-7-2 20:03
一个汉字一般需要长度为2的字符串才能存储，因此这里你需要定义grade的len至少大于4,
character表示的是ch ...

感谢解惑，可不清楚为何修改character(len=4)后，结果输出还是“？”

Transpose 发表于 2024-7-2 20:03:24

本帖最后由 Transpose 于 2024-7-2 20:06 编辑

一个汉字一般需要长度为2的字符串才能存储，因此这里你需要定义grade的len至少大于4,
character表示的是character(len=1),这里至少需要character(len=4)

select case 例题

正文摘要:

回复