WRITE(*,*) 是向屏幕，按 自由格式（或叫默认格式）输出。A(10) 是 一维数组。是一字长蛇阵。含10个元素，下标 1 到 10 A(3，2) 是 2维数组。是矩阵。 含 6个元素，3列2行。--- WRITE(*,100)((。。。打印出：1 4 2 5 3 6 WRITE(*,200)((打印出：1 2 3 4 5 6 --- ...
同样,对于Fortran 的输出,也是如此,比如要输出上述数组,可以用如下格式 WRITE(*,"(3F16.8)") ((AA(J,I),I=1,3),J=1,3) J、I必须反过来,这样才能输出我们想要的矩阵。 此外,如果在数组中,我们按照AA(1,1),AA(1,2),AA(1,3)…AA(3,3),如此挨个输入,则不需要考虑上述输入格式。
你说的不用定义i，可能是因为之前的运算里i已经被赋值了，而这个值在数组的维界范围内，所以可以正常输出。或者你这个输出语句本身在一个以i为循环变量的循环里。理论上，如果i只在类型声明里出现了一次，接下来就直接出现在这个输出语句里，期间没有被赋值，是不可能正常输出的，而且在编译的时候就可能...
因为循环结束后，循环变量的值就是最后一次循环再加1。所以 i = 6 ， j = 6 a(i,j) 自然就是 a(6,6) 了。实际上，你的代码可以简写为：Program Main Implicit None integer a( 5 , 5 ) , i , j a(:,:) = 5 a(2:5,:) = 3 End Program Main ...
case-1 一维数组的初始化dataa/5*3/! case-2 5个3初始化a数组integer::a(5)=(/1,2,3,4,5/)! case-3 注意"/"与括号之间不能有空格integer::idata(a(i),i=1,4)/1,2,3,4/!case-4,这种写法也可以用在其它处,比如:write(*,*)(a(i),i=1,5),write(*,*)(a(i),i=1,5,2) ...
格式化输出: 使用 write 函数将数组 values 的值按指定格式输出到屏幕和文件 output.txt 中。 格式化输入: 使用 read 函数从文件 input.txt 中按指定格式读取数据,并打印到屏幕上。 示例3: 处理文本文件 fortran 复制代码 program text_file_processing
先用reshape()定义矩阵的维数，其次在输出时格式使用 do i=1,n write(:,i)end do ...
在Fortran中有的时候要输出一个二维或三维数组,比如流速等。这个时候我们希望每一行能够写入多个数据。 加入我们有二维流场u(i,j). i=1,imax. j=1,jmax.输出的时候我们希望文件中每一行输出u中的每一行或每一列。一般情况下,我们可以用write(fid,'(10f12.6)', u(i,:)这种方法输出。但这个是数字10,必须...
一、write语句的基本语法 在Fortran中,write语句的基本语法如下: write(unit, format) list 其中,unit表示输出的位置,可以是一个文件名或者一个数字,表示输出到屏幕或者某个文件中;format表示输出的格式,可以是一个字符串或者一个格式化语句;list表示要输出的数据,可以是一个变量或者一个数组。 二、write语句的输出...
Write(*,*)命令:括号中的两个星号都有各自的意义,第一个星号代表输出的位置使用默认值,也就是屏幕,第二个星号则代表不特别设置输出格式。 终归一句话,Write这个命令的最简单用法,就是在括号中挂上两个星号,再把所要输出的字符串用两个双引号引起来放在后面。