Составить программу получения звуковых сигналов, используя строковую процедуру Val(s,t,code) - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Помогите с задачей: Используя строковую процедуру Val(s,t,code) для преобразования текстовой информации составить программу получения звуковых сигналов.

Решение задачи: «Составить программу получения звуковых сигналов, используя строковую процедуру Val(s,t,code)»

textual
Листинг программы
uses crt;
var s:string;
    v,d,c:integer;
begin
s:='600 2000';
val(copy(s,1,pos(' ',s)-1),v,c);
if c<>0 then
 begin
  writeln('Недопустимое значение высоты');
  readln;
  exit
 end;
delete(s,1,pos(' ',s));
val(s,d,c);
if c<>0 then
 begin
  writeln('Недопустимое значение длительности');
  readln;
  exit
 end;
sound(v);
delay(d);
nosound;
end.

Объяснение кода листинга программы

  1. Программа использует процедуру Val для получения трех значений из строки.
  2. Первое значение, полученное из строки, представляет высоту звука и сохраняется в переменной V.
  3. Второе значение, полученное из строки, представляет длительность звука и сохраняется в переменной D.
  4. Третье значение, полученное из строки, используется для проверки корректности ввода и сохраняется в переменной C.
  5. Если третье значение не равно нулю, программа выводит сообщение об ошибке и завершается.
  6. Строка удаляется, чтобы убрать неиспользуемую часть после первого использования функции Val.
  7. Программа проверяет, не пустая ли строка после удаления, и если это так, выводит сообщение об ошибке и завершается.
  8. Функция Sound используется для воспроизведения звука с высотой, указанной в переменной V.
  9. Функция Delay используется для задержки воспроизведения звука на время, указанное в переменной D.
  10. Функция Nosound используется для остановки воспроизведения звука после его воспроизведения.
  11. Значение переменной V используется как высота звука.
  12. Значение переменной D используется как длительность звука.
  13. Значение переменной C используется для проверки корректности ввода.
  14. Значение переменной S представляет исходную строку ввода.
  15. Позиция пробела в строке S используется для разделения ввода на высоту и длительность.
  16. Копирование строки S используется для передачи части строки в функцию Val.
  17. Удаление строки S используется для удаления неиспользуемой части строки после использования функции Val.
  18. Чтение данных из стандартного ввода используется для получения ввода от пользователя.
  19. Запись данных на стандартный вывод используется для вывода сообщений об ошибке.
  20. Функция Val используется для преобразования строки в целое число.

Оцени полезность:

8   голосов , оценка 4.25 из 5
Похожие ответы