Free pascal程序

发布网友发布时间：2024-10-03 13:44

共2个回答

热心网友时间：2024-11-01 12:44

右键——默认值——默认代码页——更改为‘437 （OEM - 美国）’——确定
其他的调试步骤：
例1. 1的调试：
1、Free Pascal程序的启动
双击桌面上的Free Pascal,启动后，界面如下：

2、第一次启动free pascal 时，用鼠标单击菜单不起作用，需用要进行设置。右击标题栏，选择属性：

3、在属性窗口中，去掉2个快速编辑模式和插入模式前的复选框的勾，再单击确定按纽，新弹出：将属性应用于快捷的设置，在该面板中选择：修改启动该窗口的快捷方式。设置好了，关闭free pascal窗口。再重新单击桌面上的free pascal，这时就可以用鼠标来操作了。

4、新建一程序文件：单击菜单File，选择new

5、输入代码，这里的writeln是writeLn，大小写不要紧。Writeln()后面接的是一对括号。

6、保存。按F2，或单击file/save，弹出一保存窗口。将文件保存为ex11.pas。该文件存储在free pascal的安装目录下：C:\FPC\2.0.4\bin\i386-win32

7、编译运行，按Ctrl+F9，编译后，再Alt+F5查看屏幕输出结果。

例1.2调试：
1、新建一程序文件：单击菜单File，选择new

2、以书本例1.2为例，在新建的窗口中输入如下代码：

3、代码写完后，单击file / save (或按F2)，保存文件，存储为ex12.pas，该文件存储在free pascal的安装目录下：C:\FPC\2.0.4\bin\i386-win32

4、编译程序。按Ctrl+F9，弹出如下窗口：

在此窗口中输入a的值，比如输入5，输完后，敲回车键，回到程序窗口，再按Alt+F5，在屏幕上查看输出结果。

得到输出的结果值，再按回车健Enter，回到主程序界面。追问我要上面那题的正解和解法步骤呀，不要FPC使用方法

热心网友时间：2024-11-01 12:45

倒数第4行改为for k:=i to j do f[j,i]:=max(f[j,k-1]*a[k+1,j],f[j,i]);追问我试过了，还是201呀