Не могу заставить модуль Crt со мной общаться.
Решила попробовать уж на совсем простой задачке со звуком:
суть такая - набираешь октаву, ноту, он ее проигрывает....
не фига не проигрывает.
program Notka;
Uses Crt;
var
okt:integer;
nota:byte;
hz:word;
begin
readln(okt, nota);
hz:=round(440*exp(ln(2)*okt-(10-nota)/12));
sound(hz);
delay(200);
Nosound;
end.
Может как-то к этому Crt обратиться, что ли???...
Помогите, пожалуйста!
