Создать модуль , содержащий мелодию
до sound (523)
ре (587)
ми (659)
фа (698)
соль (784)
ля (880)
Помогите пож. решить задачу в Pascal !
Убери названия нот вначале, в конце каждой строки поставь добавь ; delay(10000);
в начале программы допиши uses crt; - вот и все.
в начале программы допиши uses crt; - вот и все.
Искусство программирования - заставить компьютер делать все то, что вам делать лень.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
.. а в конце - NoSound.Хыиуду писал(а):Убери названия нот вначале, в конце каждой строки поставь добавь ; delay(10000);
в начале программы допиши uses crt; - вот и все.
Да и Delay, пожалуй, поменьше стоит задавать. 10 сек - это как-то перебор, имхо
