在程序结束前加入一行
readln;
这样让程序等待一个任意的输入再结束，对程序运行没有实际影响，只是方便你编译。
再编译就可以了本回答被提问者采纳
Free pascal练习题大全
1、倒油问题：看懂，并完成程序。有10升油在10的容器中，另有两个7升和3升的空容器，现要求用这三个容器倒油，使得最后在10升和7升的容器中各有5升。2、书本的P.250-251页的迷宫问题：看懂，完成程序并调试 3、细胞问题：一矩形阵列由数字0到9组成，数字1到9代表细胞，细胞的定义为细胞数字...
Free Pascal乱码解决方案
首先，找到Free Pascal窗口的标题栏，通常位于屏幕顶部。接着，右键点击标题栏，从下拉菜单中选择“系统属性”或者类似的选项，进入相关设置界面。在系统属性窗口中，找到“区域和语言”或者类似标签的选项，进一步选择“高级”或“编码”相关设置区域。在编码设置中，您会看到一个“默认代码页”选项，将其更...
新手入门free pascal 有些简单的问题。。。
第一问：不对的，记住，表达式在计算时是有优先级的，顺序是not,and,or（括号的优先级最高），not先算，这时编译器发现not后面是or，不是一个直接的值，因此编译错误！第二问:if a表示a是否为真（true），if not b表示b是否为假（false）因此d应当为20，x没有被赋值。
问几个关于free pascal的题目,急急急!(完成几道是几道)
17、小球从100高处自由落下,着地后又弹回高度的一半再落下。求第20次着地时, 小球共通过多少路程?18、猴子吃桃问题。猴子第一天摘下若干个桃子，当即吃了一半，还不过瘾，又多吃了一个。第二天早上又将剩下的桃子吃了一半，又多吃了一个。以后每天早上都吃了前一天剩下的一半零一个。到第十天...
free pascal 问题
这句话的意思是：那个文件被其他程序修改了，是否重新加载一个新的版本？一般是因为你在FP里编好了程序后，最小化后，用记事本打开了那个pas文件，进行了修改后保存，但是你打开还原FP后直接ctrl+f9运行程序了。在FP里重新打开那个pas就ok了
free pascal编程问题
function a : longint;begin a:=12;while a>4 do begin {...} end;end;这个例子在Turbo Pascal中，a>4会被认为是函数的递归调用，但是在Free Pascal中会认为a只是一个变量。如果想在Free Pascal中实现递归调用，就要写成下面的形式：function a : longint;begin a:=12;{ this is the ...
free pascal问题,请解释。。。
第一个while是指t>1的情况下进入，即若输入n=0、1则直接输出。第二个while是指t mod a=0的时候进入，即分解质因数。若分解了这个因数后的数还有这个因数，则继续分解：例：4=2*2。最后t div a=1时就不用输出乘号了。inc为什么不放在上面？问题问得好。首先，inc如果放在上面，则会（一定几率...
Free Pascal问题,用函数和过程解。谢谢!
if a>b then tmp:=a;a:=b;b:=tmp;if a>c then tmp:=a;a:=c;c:=tmp;if b>c then tmp:=b;b:=c;c:=tmp;s:=c;end;begin readln(a,b,c);max(a,b,c,s);writeln(s);end.其他的问题我临时没有时间 如果你不急的话 我会在 这周五晚上完整回答 我是个学生。其实...
关于FP(free pascal)的较简单问题。
优先级是这样的：先括号，然后not最高，之后是and、*、\/，然后是+、-、or和xor，最后是那些大于号小于号之类的比较符号 所以 a and not (m>n) and (x<y-m) or (a or b)=a and (not false) and (x<9) or true =a and true and true or true =true and true or true =true ...
FreePascal问题
var x,n,i:longint;begin readln(n);x:=1; i:=3;while i<=n do begin x:=x*i;inc(i,2);end;writeln(n,'!!=',x);end.
