free pascal 是面对过程还是面对对象

free pascal 是面对过程还是面对对象

面向过程的。
面向对象的一般界面是比较好的，而面向过程的则不是，以后要认真地分析

过程

program project1; function isprimenum(n: integer): boolean; var i: integer; begin result := true; for i := 2 to trunc(sqrt(n)) + 1 do if n mod i = 0 then begin result := false; break; end; end; var i, count, sum: integer; begin count := 0; i := 4; //合数从4开始 sum := 0; repeat if not isprimenum(i) then sum := sum + i; inc(count); until count = 10; writeln(sum); readln; end.

问题本身就有问题，Free Pascal 只是个编译工具，怎么会有面向过程还是面向对象之说？ Free Pascal 是一个32位的跨平台编译器，它可以编译 Borland Pascal 兼容语法、Delphi 2 Object Pascal 语法或者其它语法编写的程序。它是用来代替 Turbo Pascal 的教学和竞赛用工具。 至于 Pascal 语言，你说它是面向过程还是面向对象？

面向过程 ...