PASCAL 高手进！！

来源：百度知道 编辑：UC知道 时间：2024/06/11 18:33:27
1.我想用pascal编写一个能让音箱发音的程序，表是主板上的那个蜂鸣器哈，声音好难听啊，一定要是音箱哦，请问怎么办，能给出具体程序最好！！
2.begin
for t:=1 to 20 do
do
write(t);
end.
在屏幕上显示的是12345....
我如果想让程序在每输出一个结果后，清除以前的结果，并在同一位置输出下一个数（第一次输出‘1’，第二次输出‘2’而不是‘1 2’），请问这么办呢？

（以上二选一回答）
望高手指导！！！！
不能对声卡进行操作？？？郁闷ing
用CLRSCR应该 加USES CRT;吧？？为什么在turbo pascal上可以，在free pascal上用CLRSCR程序中的中文都没了9剩下几个英文字母了？？

Turbo pascal 声音编程

一、使用Pascal进行声音操作前的准备

首先需要说明的是我们所说的Pascal声音操作，并不是指实现Pascal对于声卡进行操作，而是利用Pascal对计算机的PC喇叭操作，使它发出声音。

在Turbo Pascal中有一个叫做CRT单元的东西，CRT单元实现了一系列强大的可以充分地控制你计算机的功能CRT单元提供了控制显示模式、扩展键盘代码、显示颜色、窗体和声音的功能。

若是要在Turbo Pascal中实现声音操作，就必须要调用CRT单元。那么怎么样来调用CRT单元呢？现在介绍一下单元调用语句：USES

USES的语法：
USES 单元表识符，……，单元表识符；
说明：
扩展名为*.TPW是Windows下的单元文件，*.TPU是DOS下的单元文件。

二、Pascal声音操作的全部——三个过程

其实，Pascal的声音操作是十分简单的，一共可以使用的过程也只有3个，由此可见，你可以用很少的时间使你的PC喇叭发出你所希望的长度、你所希望的频率的声音

(1)SOUND过程

调用SOUND的方法： SOUND(HZ)；

说明：在调用SOUND的时候，它的参数HZ必须是WORD，也就是说变量HZ必须在0～65535这个范围中，变量HZ就是使PC喇叭发出等于HZ变量数值的频率的声音，由此可见人耳可以听见的范围远远小于这个范围。

(2)DELAY过程

调用DELAY的方法： DELAY(TIME)；
说明：当你在调用了SOUND过程之后，必须指定它发出变量HZ所指定的频率的声音的时间长度，DELAY就是用来指定这个长度的过程，变量TIME必须是大于等于零的整数，并且当TIME=1000时，它所延迟的时间是1秒，也就是说TIME的单位是千分之秒。

(3)NOSOUND过程

调用DELAY的方法： NOSOUND;