help
!help!
!help!
!help!

pascal中有play过程吗?????????????????????????????

加uses play;

PASCAL里没PLAY的,至少我用的TURBO PASCAL里没有,以前看参考书时看见过,不过那是书上先定义的.(汗,刚开始时我也搞不明白)


我的参考书定义ＰＬＡＹ的那个单元是这样的.


unit music;
 interface;
uses crt;
procedure play (octave,note,duration:integer);
implementation
procedure play;
const base=32.625;    ｛这个我不太懂，本人还学初中数学｝
var　x:real ; i: integer;
begin
if note=0 then delay(duration)
else
begin
x:=base;
for i:=1 to octave do
x:=x*2;
for i:=1 to note-1 do
x:=x*1.059463994 {这个也不怎么懂｝
sound (round(x));
delay(duration);
nosound;
end;
end;
end.
------------------------------

我看这东西应该是弹　do re mi fa sol la xi 用的，具体的不知道，我有两步不懂．

你应该看看我的泡泡龙里的Music.PAS

5 楼   举报你抄袭...~~!

嗯(3声)，……，你说说我抄的哪里。