fortran的if循环语句里大于号
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/12 03:16:51
#include/*思路很简单,需要用一点点数学知识.如果3个数都取自0-9,那么总共有10*10*10=1000种可能的结果.*//*所谓概率,就是出现的次数除以样本总量.所以和为26出现的次数除以
在你的例子i=1,0,1中, 第一个1表示循环起始的数, 第二个0表示循环终止的数, 第三个1表示循环的间隔.虽然, 你这样写可以通过编译, 但是没有
表示如果i-19小于0,跳转至1语句执行.如果i-19等于0,跳转至1语句执行.如果i-19大于0,跳转只2语句执行.这是十分古老的写法,目前已经被语法抛弃.建议自己书写时不要这样写,只要看到认识就可
if.thenelseif.thenelseif.thenendif
Doi=1,30000!此处做你每次循环都要做的事情If(Mod(i,10)==1)then!此处做你每隔10次要做的事情EndIfEndDo
1x表示输出一个空格,以此类推.估计你这个是固定格式的源程序,那个“+”号是续行符号.如果是这样输出结果就应该是:-------------------------------------------
你写open(10,...),open(11,...)都可以,程序会自己开辟通道来打开,只要你两次打开不同文件不要用同一个代号就可以.
你确定你的程序没有报错?你这段代码前后矛盾.首先你定义一个node(1),这是一个容量只有1个的一维数组,它根本不是数组就是一个数.这从语法上来讲没什么错误,但是你在后面又用node(2),node(
第一次,输出1第二次,输出2第三次,输出3第四次,输出4第五次,大于等于5,跳到下一次循环.第六次,同上第七次,同上...第10次,同上.最后,输出a=11因此,结果是1,2,3,4,11如果你想输出
DOI=1,7,2DOJ=1,IWRITE(*,'(A\)')'*'ENDDOWRITE(*,'(A\)')''ENDDO再问:怎样输出一个之后继续换行呢谢谢*************再答:DOI=1
100format('输入第',i1,'位同学4门课的成绩:'\)再问:的确用这个就对了,但是为什么我的不对?……还有为什么标号一般是100,200的,用1,2也可以啊?谢谢!再答:你的100form
请参考:http://fcode.cn/guide-45-1.htmlFAQ之文件行列与二维数组行列再问:意思就是说fortran里面读取文件时候是先读取的列?再答:不,存储是列优先。读取文件时,看怎
把If和Msgbox写在统一行,是默认为没有EndIf的条件句,把换行Msgbox写入If和EndIf中间即可ElseIf方式:IfCI=1ThenMsgBox"第五位数字是"&PcEElseIfCI
这是Fortran中ArithmeticIFStatement即算术if语句,它的含义就是:当if中的值,分别是<,=,>0时,按相应顺序goto到后面的语句.具体到你的例子,就是:当a&
类似这样:If(条件)thenDoi=1,N循环体EndDoEndIf再问:感谢回答,但我是在弄一个数组,问题是If(条件)then,这条语句中,判断条件就是一个需要循环判断的,这该怎么办呢?再答:你
你好!请问是什么样的循环呢?如果可以的话,我也可以帮助你
两个方法可能可以解决你的问题:1.去掉语句中的IMPLICITNONE.2.在程序中你的确没有定义delta,你可以定义一下.再问:谢谢您!关于delta的定义:REAL(q),PARAMETER::
这些都是Fortran77的语句比较老了现在基本上不用不过编程时可以借鉴一下print*,'Point:',xi,eta这句话是为了输出x,y坐标print是输出语句后面很长的只是一个计算公式"&"是
这里相当于status这个参数默认,而默认值为unknown书中有这样的解释:status='unknown'时,由各编译器自定义.通常会同replace的效果,即文件若已经存在,会重新创建一次,原本
eala(8)integeri,ji=0doj=1,8if(a(j)==0)theni=i+1endifenddoif(i==8)then.!符合条件,进行下一步else.!不符合条件,跳回endif