Fortran Coder

标题: 逻辑问题求助 [打印本页]

作者: izzo 时间: 2014-11-24 16:00
标题: 逻辑问题求助
向高手们请教个逻辑问题，背景是有一份两个班同学的物理成绩，是随机叉开的，我要读取每一个成绩，判断这个成绩是哪个班的，如果是二班的那么该成绩乘以1.1后赋给一个数组A(I)，问题就在于赋给A（I）的这个循环应该在什么位置？我试了好久了都不行

QQ截图20141124155752.png (29.14 KB, 下载次数: 328)

这是程序大纲

QQ截图20141124155830.png (2.8 KB, 下载次数: 318)

我就想判断成绩是哪个班的，是二班的就乘以1.1，赋值给数组A

作者: 楚香饭 时间: 2014-11-24 22:26

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

i = 0

Do k1 = 1 , 100

  if ... then ...

  else if ... then

    i = i + 1

    A(i) = 1.1 * ...

  end if

End Do

作者: izzo 时间: 2014-11-25 12:50

楚香饭发表于 2014-11-24 22:26
[mw_shl_code=fortran,true]i = 0
Do k1 = 1 , 100
if ... then ...

非常感谢！！已经可以了！~

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)