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

Desktop

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

  • 小日历测试
    说明:  小日历窗口,如果日历窗口按照选择日期! 小日历窗口,如果日历窗口按照选择日期!(Small calendar window, if the calendar window according to the selected date! Small calendar window, if the calendar window according to the selected date!)
    2020-06-19 12:20:02下载
    积分:1
  • 圆盘式压电陶瓷(1)
    说明:  关于圆盘式压电陶瓷的ANSYS有限元分析的APDL语言(APDL language for ANSYS finite element analysis of disc piezoelectric ceramics)
    2020-06-24 11:20:02下载
    积分:1
  • 简单实用的jQuery计时器插件
    说明:  一款简单实用的jQuery计时器插件。该插件可以任何HTML元素中插入计时器,(A simple and practical jQuery timer plug-in. The plug-in can insert timers into any HTML element.)
    2019-01-22 14:25:23下载
    积分:1
  • tcs34725MDK
    暑假做的项目,颜色传感器hi父爱给你发给啊3(Summer vacation projects)
    2020-06-17 07:40:01下载
    积分:1
  • program
    用于sms数据处理,为fvcom准备输入文件(prepare for FVCON input file)
    2021-01-05 17:08:54下载
    积分:1
  • Ts
    说明:  模糊控制算法 做温度跟踪控制 TS模型 matlab开发的模糊控制实例(Fuzzy Control Algorithm for Temperature Tracking Control TS Model)
    2018-05-09 21:40:25下载
    积分:1
  • 寻最小支配集,用DP,复杂度是2^8 比2^150次方快多了
    寻最小支配集,用DP,复杂度是2^8 比2^150次方快多了-find the smallest dominating set with the DP, complexity is 2 ^ 2 ^ than eight 150-th power much quicker
    2022-06-29 17:33:43下载
    积分:1
  • wildcard matching procedures, detailed see Notes
    通配符匹配程序,详细见注释-wildcard matching procedures, detailed see Notes
    2022-03-21 17:48:33下载
    积分:1
  • Lcd
    s3c2440 写4.3寸LCD屏 ADS编译 (Write a 4.3-inch LCD screen s3c2440)
    2013-09-28 14:16:22下载
    积分:1
  • ANSYS-Structural-analysis-guide1
    ansys结构分析,线性静力、疲劳、断裂、复合材料、P-方法、梁分析(Ansys structural analysis, linear static, fatigue, fracture,, P- method, composite beams is analyzed)
    2015-09-18 11:15:05下载
    积分:1
  • 696522资源总数
  • 104029会员总数
  • 31今日下载