e)read(*,*)guessif(abs(guess-weight) e)read(*,*)guessif(abs(guess-weight)
登录
首页 » Fortran » Desktop

Desktop

于 2020-01-10 发布
0 82
下载积分: 1 下载次数: 0

代码说明:

说明:  program example3 implicit none real,parameter::weight=50.0 real,parameter::e=0.1 real guess write (*,*) " weight is" do while(abs(guess-weight)>e) read(*,*) guess if(abs(guess-weight)

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • 65520782sSAR_dpca
    mimo sar仿真效果非常明显, 大力推荐, 初学者可以学习(The effect of MIMO SAR simulation is very obvious and is highly recommended for beginners to learn)
    2018-03-10 12:12:25下载
    积分:1
  • TQ210串口下载裸机程序
    说明:  TQ210开发板串口裸机下载程序,方便调试裸机程序(TQ210 Uart DownLoad)
    2020-06-24 15:40:02下载
    积分:1
  • 在unix环境下编写网络编程一个很好的开发包
    在unix环境下编写网络编程一个很好的开发包 -unix environment in the preparation of network programming a very good development kits
    2022-04-16 17:44:03下载
    积分:1
  • Rotman
    设计透镜的软件, dfsd fdsafd a fewqrf wer rewqt t(designfds fdsa fdsa ererewhgf hgfdh)
    2017-07-05 08:43:23下载
    积分:1
  • 一维快速傅里叶转换
    泊松方程的解法,这是一个一维泊松方程,利用快速傅里叶变换方法解(The solution of Poisson equation, which is a one-dimensional Poisson equation, is solved by the fast Fourier transform method)
    2017-11-23 21:02:28下载
    积分:1
  • Linear_reg
    说明:  线性回归模型实现代码,用于实现线性回归,包括最小二乘,主成分分析(the code of linear regression model)
    2020-06-24 09:54:50下载
    积分:1
  • ex_ori
    解算双像片空间后方交会中像片的6个外方位元素,精度达到0.001(Solution double photo photo space resection in 6 of exterior orientation elements, the precision of 0.001)
    2011-01-10 21:49:03下载
    积分:1
  • 遗传算法优化BP网络案例
    说明:  遗传算法优化BP网络案例,得到的BP神经网络比普通更好(Genetic algorithm optimizes the BP network case, the obtained BP neural network is better than ordinary)
    2020-07-03 16:20:13下载
    积分:1
  • 基于卡尔曼滤波的电池荷电状态估计
    电池荷电状态检测算法的matlab仿真。(Matlab simulation of battery charging state detection algorithm.)
    2019-06-18 23:45:57下载
    积分:1
  • Tse, Fundamentals of Wireless Communication
    说明:  david tse著作,Fundamentals of Wireless Communication(written by dacid tse, Fundamentals of Wireless Communication)
    2019-04-09 15:21:18下载
    积分:1
  • 696518资源总数
  • 104226会员总数
  • 47今日下载