问题标签 [turbo-pascal]
For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.
pascal - 帕斯卡对角线正方形
我编写了一个应用程序,它将用对角线(从左侧)写入正方形 - 输出:
首次申请代码:
现在我必须创建一个应用程序,它将用对角线(从右侧)写入正方形 - 输出:
但我不知道我该怎么写。你能帮助我吗?
谢谢 :)
php - 将 double 转换为 Pascal 6 字节(48 位)实数格式
我需要对遗留文件中包含的数据做一些工作。为此,我需要从 PHP 中读取和写入Turbo Pascal 的 6 字节(48 位)浮点数。Turbo Pascal 数据类型通常称为 real48 ( specs )。
我有以下 php 代码来读取格式:
(改编自)
现在我需要做相反的事情:写入数据类型。
注意:我知道将 C# double 转换为 Delphi Real48 问题的答案,但它看起来非常糟糕,我认为可能有一个更清洁的解决方案。而且我的机器本身不支持 64 位。
pascal - 帕斯卡条件的问题
我正在用 Pascal 编写程序。并且在条件上有一些麻烦。
例如,如果您输入输入
1 1
1 4
5 1
2 2
tArea1
= 6 和sumAreas
= 6
但在“if”结构中,这不能正常工作。
请帮帮我。肿瘤坏死因子。
pascal - 我不知道为什么程序没有运行
请告诉我我哪里错了,我无法在 2 个程序中解决我的错误。我尝试在帕斯卡中使用递归。
这个正在运行,但它给了我错误的结果
这个告诉我“错误:非法表达”,但我不知道如何解决
pascal - 我需要使用 TurboPascal 在 DOS 中禁用/切换打印屏幕键
任何人都可以帮助我吗?抱歉没有具体说明,但这是我必须做的。我不知道我该怎么做,有没有办法直接从 TurboPascal 重新分配密钥?
performance - 检查括号顺序是否有效
我正在尝试做的是确定括号是否按正确顺序排列。例如([][[]]<<>>)
是有效的,但][]<<(>>)
不是。
我有一个工作版本,但它的效率很差,当它得到 1000 多个括号时,它的速度非常慢。我希望有人可以提出一些可能的改进或其他方法。
这是我的代码:
zavorky.in 文件中的输入数据如下所示:
我确定每一行是否有效。一行中的最大括号数为 10000。
pascal - 对字符串的算术运算
我在学校有一项任务。我的任务是创建一个可以使用 1 个输入运行的计算器。例如,输入:3+7+1*2
输出将是 12
像这样,如何创建?我在谷歌搜索创建计算器,但他们都显示基本教程,如“输入第一个数字:”“输入第二个数字”“你想要什么运算符”“结果”
谢谢之前。我的英语不好。
pascal - 在 turbo pascal 5.5 中读取/写入旧 IBM PS/2 上的文件
问题:我最近购买了一台 1989 年的 IBM PS2,我正在尝试通过软盘将大文件从我较新的基于 UNIX 的机器移动到这台 IBM。我有一个 bash 脚本,可以将我的文件分成 ~2MB 块,现在我正在尝试编写一个 pascal 程序来在这些文件被传输后重建它们。
我无法在这台计算机上找到正确的文件读/写方法。我已经尝试过各种 pascal 教程网站,但它们都是针对较新版本的(我在 Pascal 中使用文件处理的网站)。我能够创建一个空文件(如下所述),但我无法写入它。有谁知道这种计算机的正确帕斯卡读写方法?
我知道这是一个晦涩难懂的问题,所以提前感谢您能给我的任何帮助!
详情:
当前正确创建文件的测试代码是这样的:
这是一些不起作用的测试代码,方法append()
和close()
找不到:
这是一个也不起作用的替代方法,该writeln()
方法只打印到终端。但否则这确实编译。
系统:如前所述,这是一台 1989 年的IBM PS2。
- 它安装了 Windows 3.0,还可以运行 DOS 和 MS-DOS 终端。
- 它具有 Microsoft SMARTDrive 磁盘缓存版本 3.06
- 它安装了 Turbo Pascal 5.5,我将
turbo
其用作我的命令行 pascal 编辑器。(自述文件最后一次更新是在 1989 年) - 它安装了 Turbo 调试器 1.5。
再说一次,我知道这是一个晦涩难懂的问题,所以提前感谢您能给我的任何帮助!
pascal - 如何修复退出代码 201?
我的任务是用 Pascal 编写程序。当我运行程序时,结果是退出代码 201。
我不知道如何解决这个错误。
turbo-c - 如何将此 turbo pascal 代码转换为 turbo c++?
八个月前学了turbo pascal,现在正在学turbo c++,目前只知道怎么把writeln和readln翻译成turbo c++。谁能帮我把这段代码从 turbo pascal 翻译成 turbo c++ 吗?谢谢你 :)