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

Desktop

于 2020-01-10 发布
0 159
下载积分: 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 个回复

  • VKASU
    改变当前系统的分辨率,通过注册表进行,用delphi编写()
    2017-10-29 15:33:59下载
    积分:1
  • MyGL
    opengl 库文件,里面包含了glut.h,glew.h,freeglut.h(OpenGL library file, which contains the glut.h, glew.h, freeglut.h)
    2020-07-03 12:20:02下载
    积分:1
  • PB反编译工具
    说明:  PB反编译工具,支持源码查看和导出undw可以导出数据窗口。(PB decompiler tool, support source code view and export undw can export data window.)
    2020-06-19 21:00:01下载
    积分:1
  • ssd1306_stm32
    OLED Display on SSD1306 with STM32F103C8T6
    2018-05-13 00:59:07下载
    积分:1
  • Astar_4direction
    说明:  使用A星算法进行路径规划,使用四角方格,只能搜索上下左右四个方向,(We use A-star algorithm for path planning, and the algorithm can only search the upper, lower, left and right directions,)
    2020-12-15 11:26:40下载
    积分:1
  • 示波器
    说明:  给大家上传一个用Labview做的示波器供大家参考!里面有源程序,大家可以套用。(To upload a Labview oscilloscope for your reference! There are active programs, you can apply them.)
    2019-03-28 14:54:51下载
    积分:1
  • 电流滞环比较法源程序,绝对好用,自己运行过得,用的是7.0...
    电流滞环比较法源程序,绝对好用,自己运行过得,用的是7.0-Hysteresis current source of comparative law, the absolute ease of use, running their own lives, using a 7.0
    2022-02-01 13:34:32下载
    积分:1
  • 用C++ Builder编写得菜单工具栏得程序,希望对大家有帮助
    用C++ Builder编写得菜单工具栏得程序,希望对大家有帮助-C++ Builder with a menu to prepare a program toolbar, I hope all of you help
    2022-08-24 06:07:39下载
    积分:1
  • Desktop
    说明:  一种简单的二维离散点的最小二乘法拟合曲线的生成(Least square fitting of two-dimensional discrete points)
    2020-05-31 09:40:42下载
    积分:1
  • SHO
    一种基于群体自私行为的全局优化算法,比较新, Fernando A. Fausto Martinez编程实现(A Global Optimization Algorithm Inspired in the Behavior of Selfish Herds)
    2018-04-02 10:00:59下载
    积分:1
  • 696518资源总数
  • 105877会员总数
  • 14今日下载