Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Получить мультфильм "Круги на воде" Получить мультфильм "Круги на воде", используя концентрические окружности. Центры окружностей должны быть совмещены с центром экрана. Иллюзия движения создается последовательной сменой цветов всех... Примерно так.... uses crt,graph; const nmax=15; var x,y,r1,r2,n,i,r,dr,b:integer; c:array of integer; m:set of byte; begin clrscr; repeat https://www.cyberforum.ru/ turbo-pascal/ thread289379.html Turbo Pascal Как быть с константами при объединении модулей https://www.cyberforum.ru/ turbo-pascal/ thread289399.html
У мен есть несколько решенных задач, в которых я использовала процедуры. Теперь мне необходимо из всех этих задач создать личный модуль, но у меня возникает вопрос: некоторые из этих задач связаны с... Используй другие имена для констант. m1, m2... Допустимо?
Turbo Pascal Файловый тип
Создать файл, содержащий 10 записей, включающих: -Пункт назначения -Номер рейса -Количество свободных мест -Цену на билет; Вывести сведения о рейсах, вылетающих в Москву с 19-00 до 23-00, на...
Целые числа и их обработка Turbo Pascal
С клавиатуры вводим целые числа a,b,c. Если a ≤ b ≤ c, то заменить эти числа их квадратами.Если a>b>c, то каждое число поменять самым большим с них.
Turbo Pascal Анимация в паскале https://www.cyberforum.ru/ turbo-pascal/ thread289410.html
Привет все люди помогите с одной задачей разобратся в поскале.Мне нужно вот что. №1 Построить движущееся изображение самолета на фоне звёздного неба.
Turbo Pascal Составьте алгоритм, утраивающий каждую букву в заданном тексте (при этом, например, из слова "кот" должно получиться слово "кккоооттт"). Выведите
28.Составьте алгоритм, утраивающий каждую букву в заданном тексте (при этом, например, из слова "кот" должно получиться слово "кккоооттт"). Выведите полученную строку на экран. var s:string; i:longint; begin readln(s); for i:=1 to length(s) do if not (s in ) then write(s,s,s) else write(s); end.
Динамическая память и указатели Turbo Pascal
Помогите пжл решить задачу,Задание такое разработать алгоритм и программу для решения задачи с использованием указателей даны числа a1,...,an. если последовательность a1,...,an упорядочена по...
Проанализировав созданный текстовый файл, найдите в нем ошибки на правописание чк-чн, нч-нщ. Создайте текстовый файл слов с ошибками. Исправьте ош Turbo Pascal
18.Проанализировав созданный текстовый файл, найдите в нем ошибки на правописание чк-чн, нч-нщ. Создайте текстовый файл слов с ошибками. Исправьте ошибки в исходном файле. Если ошибок в файле нет,...
В заданной строке заменить все сочетания подстроки ‘на’ на подстроку ‘над’. Turbo Pascal
38.В заданной строке заменить все сочетания подстроки ‘на’ на подстроку ‘над’.
Turbo Pascal Составьте список группы спортсменов, занимающихся легкой атлетикой, включающей N человек. Для каждого спортсмена укажите фамилию, имя, название общ
8.Составьте список группы спортсменов, занимающихся легкой атлетикой, включающей N человек. Для каждого спортсмена укажите фамилию, имя, название общеобразовательной школы, класс, результаты по...
Поменять местами первые два и последние два символа строки. Turbo Pascal
45.Поменять местами первые два и последние два символа строки.
Turbo Pascal Даны две таблицы по 10 элементов в каждой. Найдите наименьшее среди тех чисел первой таблицы, которые не входят во вторую таблицу (считая, что хот 18.Даны две таблицы по 10 элементов в каждой. Найдите наименьшее среди тех чисел первой таблицы, которые не входят во вторую таблицу (считая, что хотя бы одно такое число есть). https://www.cyberforum.ru/ turbo-pascal/ thread289369.html
11 / 11 / 9
Регистрация: 06.03.2011
Сообщений: 67
05.05.2011, 19:13  [ТС] 0

Не воспроизводются звуки в паскаль! - Turbo Pascal - Ответ 1618637

05.05.2011, 19:13. Показов 850. Ответов 3
Метки (Все метки)

Ответ

Дело в том что у меня вообще по-моему не работает воспроизведение.

если я даже напишу

Pascal Скопировано
1
2
3
4
5
6
program sound;
begin
repeat
sound(600);
until keypressed;
end.
может не работает маленький писклявый динамик на мат. плате)?


Милодии посмотрел тоже не работают)

Вернуться к обсуждению:
Не воспроизводются звуки в паскаль! Turbo Pascal
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
05.05.2011, 19:13
Готовые ответы и решения:

Проблема с наушниками - очень тихо воспроизводятся системные звуки и звуки в играх.
Такая проблема: системные звуки и звуки в играх и программах очень тихо воспроизводятся. Могу слышать только очень высокие звуки, хотя...

Определяет кол-во вхождений одной Паскаль-строки в другую Паскаль-строку.
Здравствуйте. Не могли бы вы мне помочь написать программу, совсем не могу понять как ее написать. Вот задание: Составить программу,...

Перевести код из паскаль АБС в фри паскаль
Необходимо перевести этот код из паскаля АБЦ в фрипаскаль Спасибо! program test; const n=20; var ...

3
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
05.05.2011, 19:13
Помогаю со студенческими работами здесь

Кто учил Паскаль по книге "Паскаль для школьников Ушаков Д.М,Юркова Т.А" отпишитесь
Ребят кто учил Pascal по книге "Паскаль для школьников Ушаков Д.М,Юркова Т.А" ,в общем дело такое ,до этого учил паскаль по книге...

Снова перевести с Турбо Паскаля на Паскаль АВС или Паскаль АВС.Нет
program derevo; uses crt, graph; function cx(length, angle:real):integer; begin cx:=round(length*cos(angle)); end; ...

звуки
Знаю есть мануалы, но что то подходящего не нашел. нужно сделать так, что бы музыка остановилась после первого проигрыша. вот код...

Звуки в ЖД
Дня 3 назад обратил внимание, что каждые 2- 2.5 минуты в месте где расположен ЖД слышен звук Цык, а так все работает нормально. У меня...

Звуки
Доброго времени суток, не знал я куда задать этот вопрос т.к конкретно под него темы не нашел. Вопрос будет таким: Нормально ли и Должен...

0
Новые блоги и статьи
Организация масштабируемого хранилища с Apache Cassandra
Codd 14.03.2025
Изначально разработанная в Facebook, а затем переданная Apache Software Foundation, Cassandra сочетает в себе принципы Amazon's Dynamo и Google's BigTable. Эта комбинация создает уникальную. . .
Kafka или Pulsar: Что лучше для потоковой обработки в Java
Javaican 14.03.2025
Среди множества решений для потоковой обработки данных Apache Kafka долгое время удерживала лидирующие позиции, став де-факто стандартом в индустрии. Однако в последние годы всё больше внимания. . .
Создание и использование компонентов в Vue 3
Reangularity 14.03.2025
Компонент в Vue - это автономный блок интерфейса, который содержит собственную разметку, логику и стили. Представьте себе кнопку, форму ввода или даже целую панель навигации - всё это можно оформить. . .
Vue 3: Создаем современное веб-приложение с Composition API
Reangularity 14.03.2025
В фронтенд-разработке Vue 3 выделяется своим прагматичным подходом. В отличие от React с его минималистичной философией "всё — JavaScript" или Angular с его всеобъемлющим корпоративным подходом, Vue. . .
Разработка контекстных меню в iOS
mobDevWorks 14.03.2025
С приходом iOS 13 Apple представила новый API для контекстных меню, который полностью заменил предыдущую технологию 3D Touch peek & pop. Хотя многие разработчики и пользователи испытывают ностальгию. . .
Лучшие практики оптимизации Docker Image
Mr. Docker 13.03.2025
Размер Docker-образа влияет на множество аспектов работы с контейнерами. Чем больше образ, тем дольше его загрузка в реестр и выгрузка из него. Для команд разработки, работающих с CI/ CD пайплайнами,. . .
Вопросы на собеседовании по Docker
Mr. Docker 13.03.2025
Ты сидишь напротив технического специалиста, и вдруг звучит вопрос про Docker Swarm или многоэтапные сборки. Пот на лбу? Не переживай, после этой статьи ты будешь готов ко всему! Эта статья будет. . .
Поиск текста в сносках : замена дефиса на тире или тире на дефис...
РоΜа 13.03.2025
Нужно было найти текст в сносках и заменить. Почему-то метод селекшн не сработал. . . пришлось гуглить. найденный на форумвба код пришлось править. Смысл - заменяет в сносках дефисы и тире на нужные. . . .
Real PATH definitions in bash scripts
jigi33 13.03.2025
Как поймать путь и путь к директории относительно запускаемого файла в BASH 1. поймать путь через вывод $(pwd) 2. более правильно - на основе realpath (см. скриншот)
Django или Flask: что выбрать для веб-разработки на Python
py-thonny 13.03.2025
Django – это высокоуровневый фреймворк, который придерживается философии "всё включено". Он предоставляет разработчику готовые решения для большинства типичных задач веб-разработки: от аутентификации. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru
Выделить код Копировать код Сохранить код Нормальный размер Увеличенный размер