Pascal是一种计算机通用的高级程序设计语言。它由瑞士Niklaus Wirth教授于六十年代末设计并创立。
以法国数学家命名的Pascal语言现已成为使用最广泛的基于DOS的语言之一，其主要特点有：严格的结构化形式；丰富完备的数据类型；运行效率高；查错能力强。
正因为上述特点，Pascal语言可以被方便地用于描述各种算法与数据结构。尤其是对于程序设计的初学者，Pascal语言有益于培养良好的程序设计风格和习惯。IOI(国际奥林匹克信息学竞赛)把Pascal语言作为三种程序设计语言之一， NOI(全国奥林匹克信息学竞赛)把Pascal语言定为唯一提倡的程序设计语言，在大学中Pascal语言也常常被用作学习数据结构与算法的教学语言。
在Pascal问世以来的三十余年间，先后产生了适合于不同机型的各种各样版本。其中影响最大的莫过于Turbo Pascal系列软件。它是由美国Borland公司设计、研制的一种适用于微机的Pascal编译系统。该编译系统由1983年推出1.0版本发展到1992年推出的7.0版本，其版本不断更新，而功能更趋完善。
愿你开心！！！
Pascal是一种计算机通用的高级程序设计语言。Pascal的取名是为了纪念十七世纪法国著名哲学家和数学家Blaise Pascal。它由瑞士Niklaus Wirth教授于六十年代末设计并创立。Pascal语言语法严谨，层次分明，程序易写，具有很强的可读性，是第一个结构化的编程语言。
详细见:http://baike.baidu.com/view/9355.htm
var a,b,ji,n,i,j,r:Integer;
s:array[1..100]of integer;
begin
readln(n);
for i:=1 to n do begin
readln(a,b);
ji:=a*b;
repeat
r:=a mod b;
a:=b;
b:=r;
until r=0;
s[i]:=ji div a;
end;
for i:=1 to n do
writeln(s[i]);
end.
C 和 Pascal 曾经不太像，但是越来越像。
现代 C 语言借鉴了很多 Pascal 的概念：
例如，古老的 C 语言的类型检查很弱，没有函数原型。但今天的 C/C++ 语言支持函数原型（而且不提倡用旧的函数风格），类型检查机制几乎和 Pascal 一样严格。古老的 C 语言曾经只能靠指针存取外界的变量，很不安全，但今天 C/C++ 的引用参数则是相当类型安全的。而引用参数和 Pascal 的 var 参数如出一辙。
另外，Pascal 语言本身也经过了巨大的发展，Borland 功不可没。
今天人们用的 Pascal 几乎就是 Turbo Pascal 或 Delphi 的 Object Pascal。N.Wirth 时代的
program Name(input, output);
const a = 1;
type t = packed array of char;
var i: integer;
begin
writeln('这是一个古董Pascal程序');
end.
还有几个人认识？一个软件就是一个 program begin end，不能分模块，岂不要疯掉？
现代 Pascal 语言也借鉴了许多 C 语言的概念，如缺省参数值、无变量变体记录：
type
TPoint = record
case integer of
0: ( x, y: extended );
1: ( radius, angle: extended );
end;
case 部分不是 case type: integer of 而是 case integer of，实际上跟 C 语言的 union 一样了。
至于借鉴的数据类型（如 smallint, longint, 无类型指针 Pointer，类型参数）和强制类型转换机制，就更不用提了。
今天 Pascal 的文件处理，也有点模仿 C 语言，跟以前是天壤之别，谁还记得 Old Pascal 的 get/put 操作？
说这么多相似，其实也衬托了当年的不相似。语言的发展趋同，不同的（ {} 与 begin..end ）往往都是鸡毛蒜皮。
今天还有的比较重要的区别：
1. Pascal 支持子程序嵌套，C 否。因为 C 的设计目标之一就是与机器语言的结构直接对应。
2. Pascal 子程序分过程/函数，C 只有函数。
3. Pascal 类型更严格，如 char, boolean 都是特殊的枚举类型，而枚举与整型不是一回事，必须用 Ord() 转换。
而 C 的 char、enum 都被当作整型。
4. C 支持可变参数 void f(int x, ...)，Pascal 没有。
5. C/C++ 的模块机制是头文件的文件包含＋*.obj文件的连接，文件包含属于文本操作，编译速度很慢。而 Pascal 是 unit 的连接，二进制操作，编译速度飞快（对开发大型软件还是很重要的）
6. C 语言的结构/数组的初始化只用给出数值，而且元素个数可以比定义的少；而Pascal必须明确指出分量名称，个数严格对应：
var Point: TPoint = ( x: 100, y: 200 );
7. C 的标志符大小写敏感，Pascal 否。
8. C 编译预处理功能比 Pascal 的强大，实践中也很重要（它弥补了 C 编译器的许多不足）。
9. 很容易被忽视也很重要的一条：两者的表达式不同。
9.1. C/C++ 的表达式被赋予了太多的使命，连赋值语句本身也是表达式，a = b 同时返回 a，因此可以写 a = b = c; 而 Pascal 对赋值号被严格当作一个规定好的操作：赋值，别无其它，你不能写 a := b := c。
9.2. C/C++ 的表达式的类型严格取决于源操作数： char a = 100, b = 200; 则 a+b 的结果类型仍然是 char，当然就会溢出。Pascal 会“体贴”地替你扩展成足够大的数据类型：
var a, b: smallint; c：longint;
a := 32768;
b := 32768;
c := a + b; //结果是 65536，在 C 语言中则肯定是 0
归根结蒂，C 贴近机器，骨子里把操作数当作“二进制”处理（这有时是优点，尤其是跟硬件打交道时）；Pascal 贴近数学，尽量以数学的视角看待数值。
10. 至于 C 的 for 循环如何强大，Pascal 的 for 循环如何循规蹈矩，这些都不是太重要。
========================================================
我认为最大的区别在于c中的函数内部不允许定义其他函数
但是pascal的过程 函数中允许存在
另外赋值 c用＝pascal用：＝
还有就是c用{}表示作用域 但是pascal用begin end
关于for循环c可以随意给条件中的变量进行增加和减少如
int i;
for(i=0;i<100;i+=2)
{
}
但是pascal中每次只能增加1（不知道这一点是不是正确，可能跟vb搞在一起了 你就参考一下吧）
=========================================================
从oop来说他们还有些区别。
1. pascal不支持多重继承，只能由单一的父亲，而c++允许多父亲。
如果大家用果BC提供的TV编程，那么一定看过TV的源代码，你会发现他和delphi的vcl多么类似，但是他毕竟是c++写的，采用了很多多重继承，delphi后来重新写了她。
从oop的未来发展来看，并不提倡多重继承，java类似pascal也不支持这样操作，这从根本上降低了类的复杂度和可读性。
2.pascal原来没有重载、多态这些该概念，现在的borland把pascal完善的已经脱胎换骨了。
3.pascal至今仍没有c++的友元。他所谓能做到的只是可以访问同一个unit的其他类的私有变量。现在的编程中，大家应该尽量避免使用友元了。
4.pascal的所有类都是TObject的子孙，实际你什么都不写
aaa= class();
end;
仍然等效与
aaa= class(TObject);
end;
这样所有的类指针都能用TObject来转换，而且他在TObject里面已经做到了一些基本的类的初始化、析构和操作符重载。这是c++的不及。
5. 所有的pascal 必须显式声明构造函数，即使你里面什么也不写。而c++可以没有。
6. pascal所有的类都是在堆中申请，统一管理，各个类的互相操作都在堆里面进行。
而c++却可以在堆、栈和数据区里面存在，这样各个不同区域的类相互访问，成了c++需要解决的一个复杂问题。
7. 基于上面的原因。
比如一个类 TDemo,
再C++ 里面可以写成
TDemo *demo= new TDemo();
TDemo demo; // 直接创建实体
但是在pascal里面就必须写成
Demo: TDemo；
Demo:= TDemo.Create();
8.还有个问题，就是字符串。
现在可以说pascal的字符串操作性比c++要强大。
他可以直接的+,而c++却不行，这得主要原因是c++太接近底层操作了。
9.还是字符串
pascal的字符串 分为长字符串和短字符串，他们的开始string[0],这个[0]里面实际保存的是字符串的长度，长字符串是4个字节，表示4G长度的字符串，短的1个字节，最多长度255，而不像c++是结为\0表示结束。
pascal这样的好处很多，比如你想得到一个字符串的长度，c++需要扫描整个字符串，直到遇到\0才能统计出来大小，而pascal直接读[0]就行了，这个效率你可以从编译后产生的汇编代码来看。
还有一个好处就是对于多字节字符串支持，比如unicode，由于是16bit的，里面会出现很多\0，这就与c++的字符窜的结束符号冲突，c++为了解决不得不变成\0\0来表示结束。而pascal却不用任何变化。
10......还有好多，我一时想不起来了
PASCAL作为其他编程语言的基础还是可以的。也能锻炼头脑的灵活。支持你参加。 不过你想藉此来提高数学成绩短期作用不会明显。还是多多做数学习题罢。 不过偶喜欢c++.... if(你的精力不够用) { 不要参加了； } else 了一个编程语言，如果要使他和实际应用联系起来，需要有一种叫做“类库、接口”的东西支持，否则就是纯粹的数学运算。例如输入print语句可以打出字来，就是调用了一个接口。 而你们所学的语言都是比较老旧的语言，已经没有人再为他制作新的接口了所以目前看来Pascal就没有什么实际的用处了。但是Pasal被发展成了另一个语言叫做Dephil这个语言现在广泛的被使用在编写Windows程序中！ 新的语言、好的语言有好多，可你们这个年龄段的接受能力不适合学习啊。 PASCAL以其结构化程序设计，非常适合中学生学习，培养学生严谨的学习作风，方便差错、改错等，有着其他语言不可比拟的优越性，虽然渐渐地它也会被淘汰。 现在看来就数学问题而言，pascal还是很有用的。我编那个15选5中奖概率的时候，所有的规则都忘掉了，只记得个begin end，read write和for语句，连if后面or中间加括号都忘了，随机函数还是从另一个同学那里“偷”来的。结果运行的怎么都是0。在阿跳的帮助下改呀改呀改，总算能用了。 然后去编15选5重号连号的概率就简单多了，然后再编50个人里有两个人生日相同的概率和理论值，感觉比以前学的时候还简单。 老师你失败啊，想当初你怎么讲题我都很晕，现在我总算学会不用老师讲解就会编了，真的是随着年龄的增长理解的会更深吗？ { 可以参加； }参考资料: http://www.itdream.org/
C 和 Pascal 曾经不太像，但是越来越像。
现代 C 语言借鉴了很多 Pascal 的概念：
例如，古老的 C 语言的类型检查很弱，没有函数原型。但今天的 C/C++ 语言支持函数原型（而且不提倡用旧的函数风格），类型检查机制几乎和 Pascal 一样严格。古老的 C 语言曾经只能靠指针存取外界的变量，很不安全，但今天 C/C++ 的引用参数则是相当类型安全的。而引用参数和 Pascal 的 var 参数如出一辙。
另外，Pascal 语言本身也经过了巨大的发展，Borland 功不可没。
今天人们用的 Pascal 几乎就是 Turbo Pascal 或 Delphi 的 Object Pascal。N.Wirth 时代的
program Name(input, output);
const a = 1;
type t = packed array of char;
var i: integer;
begin
writeln('这是一个古董Pascal程序');
end.
还有几个人认识？一个软件就是一个 program begin end，不能分模块，岂不要疯掉？
现代 Pascal 语言也借鉴了许多 C 语言的概念，如缺省参数值、无变量变体记录：
type
TPoint = record
case integer of
0: ( x, y: extended );
1: ( radius, angle: extended );
end;
case 部分不是 case type: integer of 而是 case integer of，实际上跟 C 语言的 union 一样了。
至于借鉴的数据类型（如 smallint, longint, 无类型指针 Pointer，类型参数）和强制类型转换机制，就更不用提了。
今天 Pascal 的文件处理，也有点模仿 C 语言，跟以前是天壤之别，谁还记得 Old Pascal 的 get/put 操作？
说这么多相似，其实也衬托了当年的不相似。语言的发展趋同，不同的（ {} 与 begin..end ）往往都是鸡毛蒜皮。
今天还有的比较重要的区别：
1. Pascal 支持子程序嵌套，C 否。因为 C 的设计目标之一就是与机器语言的结构直接对应。
2. Pascal 子程序分过程/函数，C 只有函数。
3. Pascal 类型更严格，如 char, boolean 都是特殊的枚举类型，而枚举与整型不是一回事，必须用 Ord() 转换。
而 C 的 char、enum 都被当作整型。
4. C 支持可变参数 void f(int x, ...)，Pascal 没有。
5. C/C++ 的模块机制是头文件的文件包含＋*.obj文件的连接，文件包含属于文本操作，编译速度很慢。而 Pascal 是 unit 的连接，二进制操作，编译速度飞快（对开发大型软件还是很重要的）
6. C 语言的结构/数组的初始化只用给出数值，而且元素个数可以比定义的少；而Pascal必须明确指出分量名称，个数严格对应：
var Point: TPoint = ( x: 100, y: 200 );
7. C 的标志符大小写敏感，Pascal 否。
8. C 编译预处理功能比 Pascal 的强大，实践中也很重要（它弥补了 C 编译器的许多不足）。
9. 很容易被忽视也很重要的一条：两者的表达式不同。
9.1. C/C++ 的表达式被赋予了太多的使命，连赋值语句本身也是表达式，a = b 同时返回 a，因此可以写 a = b = c; 而 Pascal 对赋值号被严格当作一个规定好的操作：赋值，别无其它，你不能写 a := b := c。
9.2. C/C++ 的表达式的类型严格取决于源操作数： char a = 100, b = 200; 则 a+b 的结果类型仍然是 char，当然就会溢出。Pascal 会“体贴”地替你扩展成足够大的数据类型：
var a, b: smallint; c：longint;
a := 32768;
b := 32768;
c := a + b; //结果是 65536，在 C 语言中则肯定是 0
归根结蒂，C 贴近机器，骨子里把操作数当作“二进制”处理（这有时是优点，尤其是跟硬件打交道时）；Pascal 贴近数学，尽量以数学的视角看待数值。
10. 至于 C 的 for 循环如何强大，Pascal 的 for 循环如何循规蹈矩，这些都不是太重要。
========================================================
我认为最大的区别在于c中的函数内部不允许定义其他函数
但是pascal的过程 函数中允许存在
另外赋值 c用＝pascal用：＝
还有就是c用{}表示作用域 但是pascal用begin end
关于for循环c可以随意给条件中的变量进行增加和减少如
int i;
for(i=0;i<100;i+=2)
{
}
但是pascal中每次只能增加1（不知道这一点是不是正确，可能跟vb搞在一起了 你就参考一下吧）
=========================================================
从oop来说他们还有些区别。
1. pascal不支持多重继承，只能由单一的父亲，而c++允许多父亲。
如果大家用果BC提供的TV编程，那么一定看过TV的源代码，你会发现他和delphi的vcl多么类似，但是他毕竟是c++写的，采用了很多多重继承，delphi后来重新写了她。
从oop的未来发展来看，并不提倡多重继承，java类似pascal也不支持这样操作，这从根本上降低了类的复杂度和可读性。
2.pascal原来没有重载、多态这些该概念，现在的borland把pascal完善的已经脱胎换骨了。
3.pascal至今仍没有c++的友元。他所谓能做到的只是可以访问同一个unit的其他类的私有变量。现在的编程中，大家应该尽量避免使用友元了。
4.pascal的所有类都是TObject的子孙，实际你什么都不写
aaa= class();
end;
仍然等效与
aaa= class(TObject);
end;
这样所有的类指针都能用TObject来转换，而且他在TObject里面已经做到了一些基本的类的初始化、析构和操作符重载。这是c++的不及。
5. 所有的pascal 必须显式声明构造函数，即使你里面什么也不写。而c++可以没有。
6. pascal所有的类都是在堆中申请，统一管理，各个类的互相操作都在堆里面进行。
而c++却可以在堆、栈和数据区里面存在，这样各个不同区域的类相互访问，成了c++需要解决的一个复杂问题。
7. 基于上面的原因。
比如一个类 TDemo,
再C++ 里面可以写成
TDemo *demo= new TDemo();
TDemo demo; // 直接创建实体
但是在pascal里面就必须写成
Demo: TDemo；
Demo:= TDemo.Create();
8.还有个问题，就是字符串。
现在可以说pascal的字符串操作性比c++要强大。
他可以直接的+,而c++却不行，这得主要原因是c++太接近底层操作了。
9.还是字符串
pascal的字符串 分为长字符串和短字符串，他们的开始string[0],这个[0]里面实际保存的是字符串的长度，长字符串是4个字节，表示4G长度的字符串，短的1个字节，最多长度255，而不像c++是结为\0表示结束。
pascal这样的好处很多，比如你想得到一个字符串的长度，c++需要扫描整个字符串，直到遇到\0才能统计出来大小，而pascal直接读[0]就行了，这个效率你可以从编译后产生的汇编代码来看。
还有一个好处就是对于多字节字符串支持，比如unicode，由于是16bit的，里面会出现很多\0，这就与c++的字符窜的结束符号冲突，c++为了解决不得不变成\0\0来表示结束。而pascal却不用任何变化。
10......还有好多，我一时想不起来了
框架：
变量定义；
begin
输入；
用mod和div分别求出各个数位上的数，并求和；
输出；
end；
程序代码：
var x,ge,shi,bai,qian,s:integer;
begin
readln(x);
ge:=x mod 10;
shi:=x div 10 mod 10;
bai:=x div 100 mod 10;
qian:=x div 1000;
s:=ge+shi+bai+qian;
writeln(s);
end.
如果开始学得太累太累又没有人好好地去辅导你...靠自己还有有点复杂啦
问一个问题:你理科好吗...如果数学不太好就还是不要学了~英语是没有什么太大的关系的(当然还是有一些...关系...以后作题呢会有英文的...)
还有...努力地拼命地做题,一定要花苦功夫!书看不懂问老师,高手都是要自己钻研的,按照书上的去做吧!还有,有讨论的伙伴也是很重要的.给你几个网址...(入门后再去...题目有难有易,如果还不太懂的话信心会被熄灭的)
学算法和数据结构 ！！！
从使用者的角度来看，PASCAL语言有以下几个主要的特点：
⒈它是结构化的语言。PASCAL语言提供了直接实现三种基本结构的语句以及定义"过程"和"函数"(子程序)的功能。可以方便地书写出结构化程序。在编写程序时可以完全不使用GOTO语句和标号。这就易于保证程序的正确性和易读性。PASCAL语言强调的是可靠性、易于验证性、概念的清晰性和实现的简化。在结构化这一点上，比其它（如BASIC,FORTRAN77）更好一些。
⒉有丰富的数据类型。PASCAL提供了整数、实型、字符型、布尔型、枚举型、子界型以及由以上类型数据构成的数组类型、集合类型、记录类型和文件类型。此外，还提供了其它许多语言中所没有的指针类型。沃思有一个著名的公式："算法＋数据结构＝程序"。指出了在程序设计中研究数据的重要性。丰富的数据结构和上述的结构化性质，使得PASCAL可以被方便地用来描述复杂的算法，得到质量较高的程序。
⒊能适用于数值运算和非数值运算领域。有些语言（如FORTRAN 66,ALGOL 60）只适用于数值计算，有些语言（如COBOL ）则适用于商业数据处理和管理领域。PASCAL的功能较强，能广泛应用于各种领域。PASCAL语言还可以用于辅助设计，实现计算机绘图功能。
⒋PASCAL程序的书写格式比较自由。不象FORTRAN和COBOL那样对程序的书写格式有严格的规定。PASCAL允许一行写多个语句，一个语句可以分写在多行上，这样就可以使PASCAL程序写得象诗歌格式一样优美，便于阅读。
由于以上特点，许多学校选PASCAL作为程序设计课程中的一种主要的语言。它能给学生严格而良好的程序设计的基本训练。培养学生结构化程序设计的风格。但它也有一些不足之处，如它的文件处理功能较差等。
n
readln(n);
if n<10 then writeln('1 bit");
if n>=10 and n<100 then writeln("2 bit");
if n>=100 and n<1000 then writeln("3 bit");
if n>=1000 and n<10000 then writeln("4 bit");
if n>=10000 and n<100000 then writeln(" 5 bit");
end.
6.
var n:integer;
begin
readln(n);
if n<50 then
writeln(0.15*n)
else
writeln(n*0.15+(n-50)*0.1);
end.