Fortran 提示用户输入，并检测用户输入是否正确

最新推荐文章于 2022-12-23 02:09:36 发布

原创最新推荐文章于 2022-12-23 02:09:36 发布 · 986 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#fortran #input #io #integer

Fortran 专栏收录该内容

12 篇文章

订阅专栏

本文介绍了一个使用Fortran编写的简单程序，该程序能够不断请求用户输入一个整数，并通过循环进行错误处理确保输入有效。当输入正确时，程序将显示用户输入的整数。

PROGRAM hw

IMPLICIT NONE

INTEGER::IO_state

CHARACTER(LEN=128)::IO_msg

INTEGER::input_i

WRITE(*,*) 'Input an integer:'

IO_state=-1

IO_msg=''

READ(*,*,IOSTAT=IO_state,IOMSG=IO_msg) input_i

IF(IO_state==0) EXIT

WRITE(*,*) TRIM(ADJUSTL(IO_msg))

WRITE(*,*) 'Correct your input:'

END DO

WRITE(*,*) input_i

END PROGRAM hw

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

lafanda217

关注关注

0
点赞
踩
1

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

Fortran 从文件中读取数据放入数组中，然后对其进行bubble sort，使用了一些方法防止人为错误

月色撩人

05-23

4196

PROGRAM hw_bubble_sort IMPLICIT NONE INTEGER,PARAMETER::SIZE=200 INTEGER::IO_state CHARACTER(LEN=128)::IO_msg CHARACTER(LEN=128)::format_str,temp_str REAL,DIMENSION(SIZE)::array INTEGER::loop_index,i,j,iptr CHARACTER(LEN=128)::file_name REAL::temp

Fortran入门 - 基本语法一篇通

热门推荐

sodaxyh的博客

08-19

4万+

0. 前些日子为了准备汇报学了Fortran这个语言，最近又要用到发现有些些忘记了，所以写一篇博客整理记录学了些啥就当复习~ 主要内容还是比较基本的语法，一些小细节等以后有机会来补上吧（下次一定.jpg） 1.固定格式&自由格式（图源自网络侵删）简而言之：固定格式——比较老，老古董代码一般都是这种格式，需要读的时候能读懂就行，不用会写。自由格式——目前的使用主流。 2.输入输出入门一个语言从Helloworld开始！顺便熟悉一下Fortran的程序结构。 ..

参与评论您还未登录，请先登录后发表或查看评论

用fortran编写计算下式的FORTRAN程序，N值由键盘输入。 1+（1+3）+（1+3+5）+（1+3+5+7）+……+（1+3+5+7+……+N）...

weixin_42589700的博客

12-21

308

下面是一个可以用来计算上述式子的 FORTRAN 程序： program main implicit none integer :: N, i, j, sum ! 从键盘输入 N 的值 read(*,*) N ! 初始化求和变量 sum sum = 0 ! 外层循环枚举每一个小括号 do i = 1, N, 2 ! 内层循环枚举每一个数字...

用fortran语言编写：从键盘输入十个数，要求按输入时的逆序输出

weixin_35757531的博客

12-23

582

你好！下面是一个例子，如何用Fortran语言从键盘输入十个数并按逆序输出： program inverse_input implicit none integer :: i, n, a(10) ! 从键盘输入十个数 do i = 1, 10 write(,'(A)') '请输入一个数：' read(,'(I5)') n a(i) = n end do ...

Fortran入门教程(三)——输入输出

Sumbrella_的博客

12-10

1万+

输入输出 1. 输入 read 语句（用法一) !> program 3-1 program read_test implicit none integer :: a read (*, *) a write(*, *) a end program 上面的程序从键盘读取一个整数，再输出这个整数。其中 read(*, *) 语句为输入语句，其原型为 read(unit=*, fmt=*) [...] 该语句接受两个参数: unit : 需要读取的输入位置, 键盘

判断字符串为空

liubo的博客

12-21

616

会有同学使用这种写法 if (self.test) { NSLog(@"不为空不为空不为空"); } 这种写法其实是有问题的如图，赋值一个空字符串之后，也会走到不为空的条件里面，这显然不是我们所期望的。我们可以自定义一个内联函数 /** 判断是否是空字符串，如果是返回YES，不是的话返回NO，验证前需要保证str为NSString类型 @param str 待验证的字符串 @return 返回结果 */ static inline BOOL

Fortran输入输出处理详解

# Fortran 输入输出处理详解 ## 1. 输入输出语句规则与限制 ### 1.1 递归输入输出规则 - 递归输入/输出语句不得引用外部单元，除非它是引用其父外部单元的子数据传输语句。 - 递归输入/输出语句不得修改任何现有的...

用Fortran实现：输入一个大于10的整数n，计算n的阶乘

04-12

需要提示用户输入，并检查输入是否大于10。如果输入不符合条件，应该给出错误信息。然后，阶乘的计算可以用循环结构，从1到n累乘。注意初始值设为1。现在，编写代码的大致步骤是： 1. 声明变量n和factorial为...

【Fortran用户手册编写】：指导用户有效使用程序的黄金法则

[【Fortran用户手册编写】：指导用户有效使用程序的黄金法则](https://p9-pc-sign.douyinpic.com/tos-cn-p-0015/oQ8QR2f4QyvBEqCCeKjM8Bm7uBAXDRtAmeQLAE~tplv-tsj2vxp0zn-gaosi:40.jpeg?from=327834062&lk3s=138a59...

如何重新编译HDF5并启用Fortran支持

最新发布

06-24

然后：```makemakeinstall```注意：在配置过程中，如果遇到Fortran编译器未找到，需要检查Fortran编译器是否安装正确，并确保在PATH中。此外，用户可能还需要依赖库（如zlib，如引用[1]中提到的），需要在配置时指定...

用fortran写

03-19

Python有try-except来处理异常，但Fortran中的错误处理机制不同，可能需要使用IOSTAT参数来检测输入是否有效。然后，初始化变量sum和count，每次读取有效数字后更新它们，并计算平均值。需要注意的是，Fortran是...

Fortran 输入输出

kunpengku

03-28

7183

Fortran 必须以 end结尾。Fortran 居然能够输出中文write(,) “居然能够输出中文” 第一个* 表示默认的输出位置第二个* 表示不限定输出格式完成的写法是 write(unit=, fmt=) “居然能够输出中文”因为屏幕的输出 unit=6，所以 unit=*时，表示的就是 unit=6，每次执行write后，会自动换到下一行来准备做下一次输出。因为双

Fortran简明自学手册

蒸发杰作的博客

10-27

6762

Fortran简明自学手册 Fortran即Formula Translation（公式翻译）。是世界上诞生最早的高级语言之一，其易读，好写，很适合科学计算，一诞生便很快统治了数值计算界。因此也不难理解为何Fortran中保留了一些特殊的基础类型，如虚数。过去学习Fortran也是一种风尚。很多科学界的前辈，往往就是从这门语言开始了对编程的学习。如其字面意，本手册是一本简明扼要学习Fortran...

visualstudio开始调试不执行_ABAQUS子程序调试

weixin_39922361的博客

11-26

840

1.安装、配置ABAQUS UserSubroutine 的开发环境;本人使用的开发工具组合为 Windows 7 (x64)+ ABAQUS 6.12-1 (x64) +Visual Studio 2008 + Intel Visual Fortran 11.1.060 + IMSL Fortran Library 6.0(可选项)。首先使用 ABAQUS官方所建议的方法编译、运行简...

fortan笔记

zhutou1280的博客

09-19

6424

fortran基础知识语句结构 fortran语句分为两种：可执行语句、不可执行语句 fortran语句可以书写行的任意位置，语句间行间的衔接用&符号，类似c/c++语言中的\ 语句标号是fortran语句的名字，可以使用1~99999之间的任何一个数字，使用标号可以在程序的其他部分引用这条语句。感叹号是注释程序分为3个部分：声明部分：定义程序名和程序引用的数据以及变量的类型 progr

【Fortran】过程设计之四（其它高级特性）

小毛95的博客

05-13

2033

目录前言SAVE的使用前言 SAVE的使用 1、定义说明当过程执行完毕后，其中的所有局部变量（或数组）的值都会清除，成为未定义的值，使得再次调用时与上次调用时的值可能一样也可能不一样。在Fortran中，SAVE能够保证过程在调用前后保存其中的局部变量（或数组）。 SAVE属性：类型 , SAVE::变量1,变量2,...，类型是指各种数据类型； SAVE语句：SAVE [变量1,变量2...

Fortran 输出，在运行时决定变量所占的位置

月色撩人

05-22

1025

!使用字符串来描述格式PROGRAM hwIMPLICIT NONECHARACTER(LEN=128)::str_format !!!highlightINTEGER::num_i=21REAL::num_r=3.1415926 str_format='("The Result for iteration",I3," is",F8.5)' WRITE(*,str_format) num_i,num_r END PROGRAM

Fortran95/2003高级技巧

ProMath的专栏

06-03

4970

原文地址：Fortran95/2003高级技巧作者：小鬼Fortran95/2003高级技巧的整理，主要依据Stephen J. Chapman著，刘瑾等译的《Fortran95/2003程序设计》。选择的都是平常少用又重要的高级特性。粗体表示重点或需注意的地方，蓝色表示Fortran2003才有的新特性。 1. 隐式DO循环隐式DO循环可以用在数组初始化或读写文件中。格式为 (arg1, a