fortran中输入开根号的程序

就是I从1循环到4AE(1,JJ),AE(2,JJ),AE(3,JJ),AE(4,JJ)Fortran一种特色写法

我估计,由于你随便输入值赋给x,不会恰好是pi/2或者-pi/2的倍数,所以运算后,-1

告诉你两个函数:huge和tiny,分别是最大值和最小正值,自己测试一下便知real::xreal(kind=4)::yreal(kind=8)::zwrite(*,*)huge(x),huge(y)

表示如果i-19小于0,跳转至1语句执行.如果i-19等于0,跳转至1语句执行.如果i-19大于0,跳转只2语句执行.这是十分古老的写法,目前已经被语法抛弃.建议自己书写时不要这样写,只要看到认识就可

声明一下这是一维数组,但不确定大小

sqrt()

语法里没有这个关键字.随便一个变量或者函数,或者任何可以自由命名的东西,都可以叫buffer.根据名字的英文含义来说,应该是个缓存区.具体含义可以由程序员任意赋予.

dimensionm(4)Read(*,*)mDo100I=1,3Do100j=I+1,4Ifm(I)>m(j)thenK=m(I)M(I)=m(j)M(j)=kEndif100ContinueWri

1x表示输出一个空格,以此类推.估计你这个是固定格式的源程序,那个“+”号是续行符号.如果是这样输出结果就应该是：-------------------------------------------

先random_seed然后int(random_number*75+1)就可以了再问：天河兄，前天赶着回家，没有查知道。我这菜鸟，能不能给出一个完整的程序，我比较好理解。这个还真不知道具体怎么写。比

function里面不用动态数组就好了,你的size已经传递到num里面了,所以function直接声明：integer：：numreal::get_random(num)而integerface里面

x**y的含义是x的y次方；3**5的含义是3的5次方,3**5/2=（3*3*3*3*3）/2=243/2=121(结果一定是整数,同类型数据计算,结果类型不变)

内部函数SQRT形式Y=SQRT(X)

这个问题不算难吧!h童\x0d1.用公式编纂器在Word中打2、用以下体例：找到符号“√”然后_____√_____3/√用这个就可以了.(请用宋体看)

矩阵的大小和数值随机输入,随机输入某一数值,编写FIND子程序查找X在矩阵中的位置,在主程序中对FIND子程序进行调用,输出该元素的值和位置,若未找到则给出“notfound”信息.

%是FORTRAN90新增加的字符,表示结构中成员的一般形式：结构名％成员名.即在所属结构名后写一个百分号（％）而后写出成员本身名称.这样的成员可以像访问变量一样被访问,包括赋值、打印、引用等.

两个方法可能可以解决你的问题：1.去掉语句中的IMPLICITNONE.2.在程序中你的确没有定义delta,你可以定义一下.再问：谢谢您！关于delta的定义：REAL(q),PARAMETER::

这里相当于status这个参数默认,而默认值为unknown书中有这样的解释：status='unknown'时,由各编译器自定义.通常会同replace的效果,即文件若已经存在,会重新创建一次,原本

函数是由用户自行书写的,其参数的含义也是用户自行定义的.就好像,你拿着几个文件名,去问这些文件的含义一样.这些文件如果不是操作系统自带的文件,则没人能帮助你.如果该函数是某个函数库内的,那么查阅该函数

是读取的格式,19X代表跳过前面19个字符不读,F7.2代表以浮点数的形式读取接下来的7位,如果没有小数点则认为后面两位是小数,有小数点的话,按实际的小数点来