fortran中a(i,j)(n,n-1)表示什么意思?其中a(i,j)是二维数组
题主给出的例子中，数组名是 i2。因此，下列回答均以例子中的变量名来说明。
关于例子中的语句 read ( I2(i,j) (2:n-1),'(I2)' ) tem(i)，解释如下：
i2(i,j) 是一个字符型数组；
i2(i,j)(2:n-1) 表示字符型数组一个单元的子串，它是 i2(i,j) 字符串的第2个字符到第n-1个字符；
tem(i) 表示数组tem的第i个单元；
这个read语句表示，从这个字符子串中读取整数变量 tem(i)；
'(I2)' 是read语句读取的格式，即2位整数；据此可以推定，tem数组是一个整型数组，且tem(i)的十进制位数不大于2位。
例如：
n=6，
i2(i,j)(2:n-1) = i2(i,j)(2:3) = '1415'，
'(i2)' 格式表示，从'1415'中的头两位，读取整数，
因此，tem(i)=14。
~~~~~~~~~~~~~~~~~~~~
为了更好说明上述解释，写了几行代码
附：fortran和运行结果
用fortran实现矩阵的乘法和集合的减法
答：do i=1,4 do j=1,4 c(i,j)=0 do k=1,4 c(i,j)=c(i,j)+a(i,k)*b(k,j)end do end do end do end subroutine sub(a,b) !集合相减函数 integer a(2,5),b(2,10),i,j !这里我们使用二阶数组来保存集合，如果他的第二阶为0，则代表已经被删除，为1则代表还在 ...
用Fortran或者VB语言写出用高斯积分法计算下式的程序段。
答：Next i Next k '以上是消元过程 B(n) = B(n) / A(n, n)For i = n - 1 To 1 Step -1 sum = 0 For J = i + 1 To n sum = sum + A(i, J) * B(J)Next J B(i) = (B(i) - sum) / A(i, i)Next i '以上是回代过程 End Sub 下面的 高斯消元法就可以...
如何用 Fortran 输出矩阵啊
答：举例：用FORTRAN输出每行10个数的10*10矩阵：implicit none integer,parameter:: n=10 integer a(n,n),i,j open(10,file="out.txt")do i=1,n do j=1,n a(i,j)=(i-1)*10+j-1 end do end do write(10,"(10I5)")(a(i,:),i=1,n)end Fortran简介：Fortran源自于“公式翻译...
fortran 如何读入二维数据文件,具体实例
答：用二维数组定义啊,比如你的文件是3行2列,则定义成A(3,2)读的时候就是 do 10 i=1,3 10 read(设备号,格式) (A(i,j),j=1,2)输出就改成write就是了
...的fortran程序,本人程序小白,望能详细解读下,谢谢
答：PARAMETER (M=3,N=4)INTEGER A(M,N)READ(*,*)((A(I,J),J=1,4),I=1,3)WRITE(*,100)A 100 FORMAT(1X,10I5)K=1 L=1 !循环求最大值 DO 20 I=1,M DO 10 J=1,N IF (A(K,L)<A(I,J))THEN K=I L=J END IF 10 CONTINUE 20 CONTINUE WRITE(*,*)A(K,L)!一下...
fortran 转置问题 为什么要b(i,j)=a(i,j)
答：其实是没必要的 实际上在读入数据时，我们输入的每一行数据是存储在a的每一列里，就是说你直接输出a，也是你所输入矩阵的转置了。你若改为这样，可能就是这个题目的真正意义了。program zhuanzhi real,dimension(4,4)::a,b read(*,*)((a(i,j),i=1,4),j=1,4)10 format(1x,4f6.2)do...
我们考试FORTRAN 90的一道题:一维数组a中存放了10个整数,要求对这10个...
答：做一个简单的冒泡排序即可，程序如下，望及时采纳！program main implicit none integer :: a(10) = (/ 1, 3, 5, 2, 12, 9, 6, 25, 7, 10 /)integer :: i, j, temp do i=1, 10 temp = a(i)do j=i+1, 10 if (a(j) < a(i)) then temp = a(j)a(j) = a(i)...
在fortran中,如何提取字符数组中每个字符串的前两位
答：program abc123implicit nonecharacter(len=10)::a(5)=(/"afdfdfsd","asfdsfgdg","gfgergdfd","fwegsddfd","fdsgergfs"/) !需要提取字符串的数组character(len=2)::b(5)character(len=10)::xinteger::ido i=1,5x=a(i)b(i)=x(1:2) !提取前两位end dodo i=1,5write(*,*)b...
fortran95 把这个 杨辉三角弄成 金字塔型的 怎么也弄不上去空格 求高手...
答：倒数第三行改为，10 format(10(1x,i5))，试试
关于fortran冒泡法~排序4个数~完整源码.关系到小弟幸福~谢谢高手拉...
答：INTEGER::I,J WRITE(*,*) '请输入A、B、C、D四个数：'READ(*,*) A DO I=1,4-1 DO J=I+1,4 IF(A(J)>A(I))THEN Z=A(I); A(I)=A(J); A(J)=Z C1=CC(I:I); CC(I:I)=CC(J:J); CC(J:J)=C1 ENDIF ENDDO ENDDO WRITE(*,*) '四个数从大到小的次序为：'...
