什么是pascal语言程序

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

我要参加信息学奥林匹克大赛可直今我连pascal语言程序是什么都不懂，pascal语言程序到底是啥？是干什么用的，注意！大家注重回答是干什么用的。

解析:

Pascal语言概述与预备知识

1 关于Turbo Pascal

Pascal是一种计算机通用的高级程序设计语言。它由瑞士Niklaus Wirth教授于六十年代末设计并创立。

以法国数学家命名的Pascal语言现已成为使用最广泛的基于DOS的语言之一，其主要特点有：严格的结构化形式；丰富完备的数据类型；运行效率高；查错能力强。

正因为上述特点，Pascal语言可以被方便地用于描述各种算法与数据结构。尤其是对于程序设计的初学者，Pascal语言有益于培养良好的程序设计风格和习惯。IOI(国际奥林匹克信息学竞赛)把Pascal语言作为三种程序设计语言之一， NOI(全国奥林匹克信息学竞赛)把Pascal语言定为唯一提倡的程序设计语言，在大学中Pascal语言也常常被用作学习数据结构与算法的教学语言。

在Pascal问世以来的三十余年间，先后产生了适合于不同机型的各种各样版本。其中影响最大的莫过于Turbo Pascal系列软件。它是由美国Borland公司设计、研制的一种适用于微机的Pascal编译系统。该编译系统由1983年推出1.0版本发展到1992年推出的7.0版本，其版本不断更新，而功能更趋完善。

ycyz/lyx/CHENGXU/NOIP/PASCALjiao%27an

这个问题类似于开关灯的问题，我们可以另状态开为1，关闭为-1，此遍历过称为（原数据）*（-1）；主程序如下：var

i,l,n,s:integer

door:array[1..100]of integer

begin

write('input N:')readln(n)

for i:=1 to n do

door[i]:=1

for i:=2 to n do

for l :=1 to 100 div i do {这部你需要理解一下}

door[l*i]:=door[l*i]*(-1){遍历过程}

s:=0

for i:=1 to n do

if door[i]=1 then

Inc（s） {开始计数}

writeln('the number is:',s)

end.

---