Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Звук с Crt

Автор: -Наська- 3.12.2006 21:16

Здравствуйте!!!!
Не могу заставить модуль 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 обратиться, что ли???...
Помогите, пожалуйста!

Автор: klem4 3.12.2006 23:42

У тебя вообще звука нету или в чем проблема ?


ps
http://forum.pascal.net.ru/index.php?showtopic=4847&st=0&p=39717&#entry39717

+ Пользуйся тегами в следующий раз

Автор: Гость 4.12.2006 13:47

[quote name='klem4' date='3.12.2006 19:42' post='81800']
У тебя вообще звука нету или в чем проблема ?

Прога вообще не грузится. Divizion by zero. вот

Автор: klem4 4.12.2006 17:14

Странно, на FPC и BP компилируется и даже какие-то звуки выдает, другое дело что рассчет возможно не верный smile.gif

Какие ты данные вводишь ? Или у тебя еще до ввода DivByZero вылетает ?

Автор: -Наська- 5.12.2006 19:52

Не компилирует.....