Developing.ru

[quote="Хыиуду"]Убери названия нот вначале, в конце каждой строки поставь добавь ; delay(10000);
в начале программы допиши uses crt; - вот и все.[/quote]
.. а в конце - NoSound.
Да и Delay, пожалуй, поменьше стоит задавать. 10 сек - это как-то перебор, имхо :)

Убери названия нот вначале, в конце каждой строки поставь добавь ; delay(10000);
в начале программы допиши uses crt; - вот и все.

Создать модуль , содержащий мелодию
до sound (523)
ре (587)
ми (659)
фа (698)
соль (784)
ля (880)