问题标签 [turbo-pascal]

我正在使用 Free Pascal Free Vision 编写一个基本的“hello world”程序，我想删除颜色并保持程序单色。只是黑白的。

我知道这在旧的 Turbo Pascal 时代是可能的，但我找不到任何参考或示例代码。我正在使用最新版本的 Free Pascal，但 Turbo Pascal 的答案也会对我有所帮助。

任何想法？

我想做一个程序来写一个彩色文本，类似 writeln();

但是当我编译它时，Pascal 发现一个错误 not found type Arguments

我查看了 Lazarus，在单元系统中，它有writeln程序：

请帮助我，谢谢。

我需要一些帮助来解决这个 Turbo Pascal 问题：

如果 N1 的每个数字在 N2 中至少出现一次，则称两个整数为兄弟，反之亦然。示例：如果 N1 = 1164 和 N2 = 614 程序将显示 N1 和 N2 是兄弟，如果 N1 = 504 和 N2 = 455 程序将显示 N1 和 N2 不是兄弟

我的问题是：如何检查这两个整数是否是兄弟？这是我的工作：

当我运行它时，它总是打印（“整数是兄弟”），即使我输入 504 和 455，我想知道错误在哪里。

我有一个格式的输入文件：

(an), (a n-1), ... (a 0)

如何在 Pascal 中形成如下列表

例如：
(5 10)、(5 9)、(5 8)、(5 7)、(5 6)、(5 5)、(5 4)、(5 3)、(5 2)、(5 1), (5 0)
应该像上图：

新代码（按预期工作）：

我有错误“无效的数字格式”，因为在第二个数字之后我们有'）'。我不知道如何读取数字，直到 ')' 因为数字可以不同（1-1000）。

这就是问题

有人可以帮助我吗，我真的不明白他们到底是如何在这个程序中得到 x*y 的……问题是程序是做什么的？

我们在学校里做帕斯卡，任务是得到所有只有拉丁字符的单词，这些单词在这些单词中按字母顺序排列。所以我输入“sba dcb onml dfsf cba kl2 joh;” 并且程序的输出为“sba dcb onml dfsf cba”，这基本上是正确的，但我不明白为什么它包含“dfsf”，我该如何解决？PS：对不起我的英语。

找到矩阵 A (5,8) 每一行的负元素的最大绝对值，并将它们重新排列到第一列。不知道下一步是什么！我在这段代码中的下一步是什么？请帮帮我）

我看过很多关于这个的帖子，但没有一个回答这个问题，他们给出了不起作用的例子，你得到的只是更多的错误消息，或者只是在其他切线被发送。ncurses 不断被提及，但我在 OS X 上找到的示例都没有，尽管声称。这些示例要么是错误的，要么在发布之前没有经过实际测试。我会在这些帖子中添加评论，但由于我是新用户，所以我不能询问任何关于它们的内容，这也很荒谬，因为这比必须开始一个新主题要容易得多。

我希望程序问一个问题，等待用户输入并读取每个按下的键而不按下返回键，几年前我相当精通 Turbo Pascal，这很容易做到，就像 Pascal 中的大多数事情一样，它只会工作......我认为C ++会相似，相反，您只是不断面临相反的平台特定用例，以及永远不会编译的示例。

我在 OS X 上使用 CLion 2017.2.2。

我试图理解fpc -Mtp -vw在 Linux 下以 Turbo 模式（特别是）编译的 Free Pascal 中出现的一种有点神奇的行为。代码来自 Jack Crenshaw 的“Let's Build a Compiler”，第 IV 部分，特别是带有Input和Output过程的最后一个版本，可在http://www.pp4s.co.uk/main/tu-trans-comp-jc-04找到.html。我发现“神奇”的是程序中的Read(Table[GetName]);一行Input。根据 FP 文档，“Read从文件 F 中读取一个或多个值，并将结果存储在 V1、V2 等中；如果未指定文件 F，则读取标准输入。” 在过程Read中GetChar，它的行为似乎很像 C getchar()，即从标准输入缓冲区中检索下一个字符。在里面Input调用它反而看起来像一个复杂scanf()的自动跳过空格并将多位数字转换为整数，并消除了对GetNum函数的需要，如果您使用例如，则不会调用该函数，?i 345但如果你试试i=345，如果你在结果的两边留一个空格，就会=导致解析错误。是否有其他文档可以证实 Free、Turbo 甚至通用 Pascal 的明显多功能性Read？