Question

我有一个计算3个数字中最大数字的程序。我需要修改程序作为结果写入文本文件maxim.out（PASCAL）

Answer 1

您可以使用以下内容编写值（假设它是一个整数，并且名称为yourValue）：

var
  maximFile: Text;

...

  Assign(maximFile, 'maxim.out'); // link the name to the Text variable
  Rewrite(maximFile);             // open it for writing
  Writeln(maximFile, yourValue);  // write the value as a line of its own
  Close(maximFile);               // close the file

您可以稍后使用以下内容回读该值：

  Assign(maximFile, 'maxim.out');
  Reset(maximFile);
  Readln(maximFile, yourValue);
  Close(maximFile);

我没有添加任何错误处理（例如，如果找不到文件，或者它是readonly，或者是空的，或者......）。根据设置，可以使用例外或IOResult值完成。阅读有关如何执行此操作的文档。文档中应该有例子。

Answer 2

您应该阅读“pascal中的文件管理”。无论如何，声明一个textfile类型的变量：

var
  outputfile    : TextFile;

然后assignfile（）为它选择你的名字（maxim.out），重写（）文件，用writeln（）写入它，最后用closefile（）它。

您可以在此处找到完整的示例程序：http://wiki.freepascal.org/File_Handling_In_Pascal

Pascal我需要修改程序作为结果写入文本文件maxim.out

2 个答案: