问题标签 [turbo-pascal]

我正在学习如何使用 Pascal 的图形模式（使用 Turbo Pascal 5.5）。这是一个简单的代码，它向我展示了带有一些消息的图形模式：

好吧，我遇到的问题是“Readkey”；给我一个“未知标识符”错误。我尝试用“Readln;”更改行 它工作得很好。这里有什么问题？谢谢！

我有一个旧的 TP5 程序。它使用 TP7 编译并运行正常。我想捕获并记录一些 write / writeln 语句。我可以对 write 和 writeln 进行全局搜索和替换，所以我不介意这样的代码更改。它确实使用了一些格式化的输出： write(r:4:2) 所以我想保留它。

除了写入文件，然后读取每一行并再次写入之外，我不知道任何方法来捕获 write/writeln :~( 但我突然想到，这非常像写入流（在 Tp5.1 中引入）。 5)，然后将副本流式传输到多个输出。

有没有人这样做过？可能吗？还有其他方法吗？

我在面向对象的 Turbo Pascal 中有以下代码（示例）。还有一些问题要问你们，他们有 Turbo Pascal 的知识——因为我找不到任何答案。

问题 #1

我看到类似的代码new(PMyNumber,Init(-4,0))- 它是某种类型的对象构造函数吗？

问题2

我尝试查看MyColl[myIndex]^.At(j). 为此，我打开Evaluate/modyfy窗口，但单击Evaluate按钮后，出现以下错误 - 怎么了？

此外（我认为)这里不需要字符：

问题 #3

如何读取指针变量值？

这是我的情况，我目前正在 Lazarus IDE 中使用 Turbo Pascal 语言创建Yahtzee 游戏，我正在开发的评分方面，我已经完成了较低的评分部分，我已经开始了较高的部分，但我需要一些帮助编写一个程序来检查三个，我最初的想法是使用一个数组并加载骰子值的随机数，然后使用循环函数来检查 3 个相等的数字，但我不是很自信在这个领域。我能得到一些帮助吗？我不是要代码，尽管它会有所帮助，只是朝着正确的方向前进。

我的骰子整数值变量是“Dice1”、“Dice2”、“Dice3”、“Dice4”、“Dice5”、“Dice6”

我有一个 Turbo Pascal 5.5 程序，它生成了一个包含 Not A Number 值的二进制数据文件。使用 Turbo Pascal 5.5，我可以正确导入数据文件。但是当我在测试时遇到范围检查错误时

当然，我可以关闭范围检查，但我仍然需要识别 NaN 和 INF 值并将它们转换为不同的形式。

在 Turbo Pascal 5.5 中是否有用于识别 NaN 值的 Borland/Turbo Pascal 方法？还是我必须将数字映射到 LongInt 并检查位值？

我需要将单个位图加载到 Pascal 程序中，有没有办法做到这一点，或者我必须逐个像素地绘制？

我有一个问题问你。我需要在每一行中写下最大元素。例如，我的表：

我想得到 4,8,12 我试过但没有结果：

请帮我结束。

我下载了 TP 5.5 并将其安装在运行 FreeDOS 的虚拟机中。

我试过这个短代码：

Turbo Pascal 说：“错误 3：未知标识符。”

我可以使用关键字 inline works 但我不能使用助记符，我的目标只是在实模式下学习一些汇编，所以我不能去 Delphi 并在那里使用助记符。

我最近一直在尝试编写一个程序（基于文本的游戏），但我只知道一些命令并且不太了解每个命令。

我想做的是一个成功的机会。可以说我希望程序具有

• 90% 的机会选择数字 1（这意味着命中）和
• 10% 选择数字 0（这意味着错过）。

我在这里看到了同样的问题 ，但我不明白这些命令，因为我从未使用过它们（我说的是set.seed和sample）。有人可以向我解释他们是如何工作的吗？还有另一种方法（更容易理解？我不介意它是否消耗更多资源）

Lets say I've made a pascal program. Let's say that I haven't saved the program and I mistakenly created a loop. I ran the program and I'm stuck in a loop in the DOS run screen. How do I get out without Alt+F4? The program I am using is Turbo Pascal.