如何在fortran字符串中获取或设置指定索引处的字符？

Question

program polynomialCalc
  character(Len=100):: polynomialString="fds"

  Do i=1, Len(Trim(polynomialString))    
    Print*, i, polynomialString(i:1)
  END Do
END program polynomialCalc

我不知道为什么上面显示的代码只返回第一个字符＆＃34; f＆＃34;。我会很感激解释和解决方案，如何解决这个问题。

另一个问题是如何在指定的索引处设置字符？

Answer 1

要获取特定字符，请对子字符串范围的开头和结尾使用相同的索引。例如：

polynomialString(i:i)

将是位置i的单个字符。

Answer 2

要在特定位置设置字符，您可以

polynomialString(pos:pos) = 'c'

要将字符从一个位置设置到一个位置，可以执行

polynomialString(posFrom:posTo) = "12"

您可以和他们一起玩，看看它们如何工作。