一个新人小白的愚蠢问题

牛肉乾

问题是这样的

将1-100的整数，按照奇数和偶数并排分列为两列，并且一一对应进行任意计算。

需要达到输出的效果为

1            2           1+2=3

3            4           3+4=7

      。

            。

            。

            。

            。

            。

99        100         99+100=199

（呜呜呜，自学太难了，时间完全不够）
感谢大佬们的指点

七星彩

[Fortran] 纯文本查看 复制代码

program fcode_cn
  implicit none
  Integer , parameter :: TOPN = 100
  integer :: i
  Do i = 1 , TOPN , 2
    write(*,'(2(i4,1x),i4,"+",i4,"=",i5)') i , i+1 , i , i+1,  i+i+1
  End Do
end program fcode_cn

liudy02

七星彩 发表于 2020-10-8 18:03
[mw_shl_code=fortran,true]program fcode_cn
  implicit none
  Integer , parameter :: TOPN = 100

这个楼主怕不是来这里求作业的……

ahafigure

[Fortran] 纯文本查看 复制代码

      do i = 1, 100,  2
             write(*,*)i, i+1, i, '+', i+1, 2*i + 1 
      end do
      end