Pascal是1969年创建的Wirthian家族的必修语言。它在20世纪70年代和80年代被广泛用于工程和教学。它以Free Pascal和Delphi的编译器为生。
我有一个小问题。我编写了一个程序,要求用户输入包含 11 位数字的代码。我将其定义为字符串,但现在我想单独使用此代码中的每个数字......
如何在 Delphi 中创建一个接受 Extended 二维数组并返回 TArray<Extended> 的函数?
我有这个函数可以通过高斯消元法求解 3x4 矩阵。但是我在运行程序时遇到了这个错误。 [错误] Unit1.pas(79):需要标识符但找到“ARRAY” [错误]Unit1.pas(79):
我尝试编写在Delphi中单击按钮后抛出BSOD的程序: procedure RtlAdjustPrivilege(var Privilege: Integer; var bEnablePrivilege: Boolean; var IsThreadPrivilege: Boolean; var
我有以下字符串A类型字符串。 A = 'flagA=0,flagB=0,flagC=1' 我也有 B:TStringList。 我想将其转换为 TStringList,以便通过检查 B 来查看 flagC 是否设置为 1....
我在学校学习 Pascal 伪代码,我的老师给我发了这个练习: 用伪代码编写一个算法,当读取 N 个学生的姓名和年龄时,计算其中有多少人拥有
如何在 Delphi 布局中保存 INTACustomDockableForm 窗口位置
INTACustomDockableForm 接口包含两种方法:一种用于保存窗口状态,另一种用于加载窗口状态。 我已将它们实现如下: ... 过程 TMyDockableForm.SaveWindowSt...
为什么我的双链表除了第一个添加的数字外,显示的数字都是倒序的?
我编写了这段代码,您可以在其中添加或删除列表中的数字,然后显示该列表。问题是:它以相反的顺序显示数字,除了第一个添加的数字。 节目
我似乎对 Pascal 中的函数有问题。该程序只是一个普通的递归binsearch,但它总是返回值4?有人能指出解决方案中的错误吗? 变...
是否可以在 Delphi 编程语言中将枚举值转换/转换为整数? 如果是的话,怎么办?
我有位方程: x + y = x | y 如何解这个方程?我需要找到方程成立的第 k 个最小正整数 y 。也许有什么算法?我在哪里可以读到相关内容?
这就是问题所在 有人可以帮助我吗,我真的不明白他们到底是如何在这个程序中得到 x*y ...问题询问程序是做什么的? 程序iz52(输出); ...
我尝试在代码中转换指针。但它引发了访问冲突。 我在网上尝试了很多方法,但都失败了。 主程序: createthread(nil,0,@make,@cli,0,tmp);//cli是一个
如何在 Pascal 函数 Succ 中设置? 我的意思是,当我将 Succ 放入代码中时,它会将字符的序号移动到下一个位置。但只有一次。有没有办法,让它移动三遍不...
我想让用户给我可变数量的字符串(作为virables)。 例子 : 开始 cout('你好').(' ').('世界') 结尾。 这将打印:“Hello world” 我知道我只能让他输入一个str...
我正在通过 powershell 脚本运行我的 setup.iss 文件: if ($something -eq '测试') { $使用端口= 1 } if ($something -ne 'dev') { $使用端口= 0 } & $innoiscc ".\setup.iss" /DUSEPORT...
如何将重置程序从 Sun Pascal 转换为 Free Pascal?
我有一个使用Sun pascal 2.1编译的pascal程序,我现在想用fpc编译它,但遇到了一些麻烦。该程序中使用了重置过程,但是 太阳帕斯卡的重置:重置...
我写了一个用矩形法求解积分X^2+2的程序 程序四; var a, b :实数; { 边框 } h:实数; { 增量参数 } s:实数; { 近似值...