【求助】FORTRAN的连续打印

jorgenhojmann

我想要在FORTRAN中打印
  
连续打印100个“*”
如果采用循环的方法
***********************
应该使用什么命令，使得打印第二个*号，可以紧跟在前一个*号之后呢？
  
VB 命令如下：
  
for i=1 to 100
print "*";
next i
print
请斑竹帮忙

jorgenhojmann

我好象在什么书上看到过，在打印的代码后面跟一个什么符号
就可以连续打印了
有吗？

zhanghuaa

是反斜杠\？

jorgenhojmann

我试了一下，不是反斜杠\
到底是什么呢？
请斑竹告示！！

freepu

2. DO I = 1, 100
3.     WRITE(*, '(A1\)') '*'
4. ENDDO

复制代码

yexm

do I=1,100
write(*,"(a\)")"*"
end do
  
a后面不需要1
  

freepu wrote:

2. DO I = 1, 100
3.     WRITE(*, '(A1\)') '*'
4. ENDDO

复制代码

freepu

没错，不需要1可以，这是个人的习惯;)。忘了连续打印还可以用$的。

2. DO I = 1, 100
3.      WRITE(*, '(A, $)') '*'
4. ENDDO

复制代码

or

2. DO I = 1, 100
3.      WRITE(*, '(A, \)') '*'
4. ENDDO

复制代码

jorgenhojmann

请问斑竹
里面的A代表什么意思啊？
  
我刚开始学FORTRAN
用的是POWER STATION
  
斑竹能推荐一本好一点的电子版的书吗？

freepu

A代表字符编辑。
如果你用CVF6的话，其帮助中有Language Reference，其下有一部分I/O Formatting，参见Data Edit Descriptors->Character Editing (A)有详细介绍。电子版的书没看过，推荐不了。

SCIE

格式里加个“$”比较好