问题标签 [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.

0 投票
3 回答
2148 浏览

delphi - Delphi/Pascal/FreePascal 中的 MD5 用于短字符串

我正在尝试为短字符串(短于 64 字节)实现简单的 MD5。我正在使用来自维基百科的算法。. 一切都编译,但我的字符串结果:

是:

虽然它应该是:

完整代码在这里:

您可以在这里在线尝试代码:http: //ideone.com/qdYQ6q

这是我在主循环(test.txt)之前准备好的块的转储:

在此处输入图像描述

0 投票
1 回答
1669 浏览

pascal - 从 Pascal 中的数组中计算素数

我在 PAscal 中遇到问题。我想计算素数但没有结果:我的代码是:

对于这个数组,我想得到 3,但我得到 2……我不明白我的问题出在哪里。请帮帮我

0 投票
1 回答
3114 浏览

pascal - 如何将多个语句用于一个 case 语句?

所以我正在使用pascal,我想在一个案例中添加多个语句。我尝试了此代码,但出现错误:“错误:常量和 CASE 类型不匹配”

0 投票
1 回答
1100 浏览

audio - 涡轮帕斯卡的声音。它们是如何工作的?

我已经尝试了一段时间来了解声音是如何工作的以及如何将它实现到帕斯卡。没有成功。我开始使用 8 位声音(我相信它们是 8 位的)并尝试复制一些歌曲(如马里奥歌曲)。我有一些问题。1. 我如何使用程序播放歌曲(一首真正的歌曲) 2. 是否有任何网站提供 8 位歌曲但在代码中(频率和持续时间)和一个不相关的问题....有没有办法复制从浏览器到免费帕斯卡的代码....?我对免费帕斯卡真的很陌生。

0 投票
0 回答
108 浏览

pascal - 斯皮尔曼与帕斯卡的关系排名

我正在做一个项目,我需要计算一些数据的矛兵排名,目前我的程序可以计算矛兵排名,只要他们没有平局。我会使用现有的单位,但我需要在字符串网格中显示排名值,以及它们的排名,而不仅仅是 Spearmans 值本身。我在想出一个解决方案时遇到了麻烦,该解决方案允许对绑定值排名进行平均,以便在存在绑定数据时计算测试。谢谢你的时间。

是斯皮尔曼等级

这是我到目前为止的代码,这只是对值进行排序和排名,实际的 spearmans 值是在另一个过程中计算的

0 投票
2 回答
727 浏览

string-matching - turbo pascal 从字符串中删除第二个空格

这对我来说似乎很简单,但我无法理解它。我想取一个字符串,检查空格,忽略第一个空格,但删除所有后续空格。例如:

MyString := '亚历山大大帝';

输出将是“亚历山大大帝”

非常感谢提前!(在 DOS 下使用 Turbo Pascal 7.0)

0 投票
1 回答
2777 浏览

arrays - Pascal 的合并排序示例

我的老师给了我一份关于如何在Pascal中对两个数组进行合并排序的作业。

其中一个数组被命名为N并排序为ASCENDING ..

其他名为M并按DESCENDING排序的数组。

它们是预定义的,他希望我对这两个数组进行合并排序。

N [ 2, 4, 5, 8, 10 ]

米 [ 9, 7, 6, 3, 1 ]

合并排序 [ 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 ]

那么我该怎么做呢?

谁能通过简单的编码示例向我解释这个合并排序算法?

0 投票
1 回答
416 浏览

assembly - 在 Turbo Pascal 中使用程序集更改屏幕颜色

我在 turbo pascal 中的语法有问题,这在调试中没有问题,但我不能让它在 Turbo Pascal 中工作。

我不知道出了什么问题。

PD:这东西里的h、$和b是什么意思?

0 投票
1 回答
816 浏览

assembly - 如何在 Turbo Pascal 中使用程序集 8086 定义字符串?

我只会写汇编代码。

我想使用中断 10h/13h 将字符串写入屏幕。但我不知道如何使用 turbo pascal 中的程序集定义或保存在内存中的字符串。

这没有用:

我的代码:

有人知道吗?

0 投票
1 回答
866 浏览

assembly - 在 Turbo pascal 中使用汇编:行太长

我有这行代码:

但是 turbo Pacal 给出错误 11:行太长。

所以我试着这样做:

但给出语法错误。

我在谷歌上搜索了这个,但我一无所获。

那么,如何用 Turbo pascal 编写这段代码呢?它必须是某种方式。

感谢...