如何检查用户输入是否适合变量？

Question

我正在尝试用Fortran95/03写一个简单的程序来计算一个函数，它需要一个数字(X)作为输入，并得到一个数字(Y)作为输出。用户输入是一个real :: input，read调用看起来像这样

read (*,*, iostat=stat) input
if(stat > 0) then
    print *, "False input, use numbers!"

iostat帮助我检查输入的是数字还是字母。

我的问题是，如果我输入一个非常大的数字，比如1000000000000，程序就会崩溃，并显示错误消息"bufferoverflow“。我知道我可以让实数比4字节的变量更大，但我也可以让输入的数字更大，所以这并不能解决问题。

主要的问题是，有没有可能防止程序因为用户输入而崩溃？

Answer 1

检查用户输入的值是一项非常基本的技术，它必须在所有与其他人交互的软件中使用，而不仅仅是作者。它在所有编程语言中都使用。

您可以只使用一个简单的条件

if (input > input_max) then
  print *, "Input value too large, try again"
  cycle ! or return stop or set some flag or whatever
end if

别忘了这个值也可能太小了！

理解崩溃是从哪里来的是很重要的。它当然不是仅仅来自输入一个大的数字，而是以错误的方式使用数字，例如，分配一个太大的数组，或者通过进行触发浮点异常的计算。

Answer 2

将输入作为字符串读取，然后验证字符串输入，然后使用内部读取将验证后的字符串转换为实数。

输入和输出依赖于处理器的行为有很多方面，作为一般原则，如果你想要健壮性，那么你需要自己做大部分的腿工作。例如，如果为real提供了格式错误的输入，则不需要处理器将其识别为错误条件并返回非零IOSTAT代码。

List directed input提供了更多的挑战，因为它有许多令人惊讶的功能，可能会让你和你的用户绊倒。