Какую программу нужно составить для удаления всех знаков тире и пробелов из введенной с клавиатуры строки s в Паскале?

Предмет вопроса: Удаление знаков тире и пробелов в Паскале

Пояснение: Для удаления всех знаков тире и пробелов из строки s в Паскале, нам понадобится написать программу, которая будет применять операции обработки строк.

Вот пошаговое решение:

1. Создайте переменную `i` для итерации по символам строки `s`.
2. Создайте новую пустую строку `result`, в которую мы будем добавлять символы из `s` за исключением знаков тире и пробелов.
3. Начните цикл, выполняющийся от `i = 1` до `i <= Length(s)`.
4. Проверьте текущий символ `s[i]`, используя условие `if s[i] <> "-" and s[i] <> " " then`, чтобы исключить знаки тире и пробелы.
5. Если символ не является знаком тире или пробелом, добавьте его в строку `result` с помощью оператора присваивания `result := result + s[i];`.
6. Увеличьте значение `i` на 1 (`i := i + 1;`).
7. После завершения цикла, в переменной `result` будет храниться измененная строка без знаков тире и пробелов.

Демонстрация:

program RemoveDashesAndSpaces;

var

  s, result: string;

  i: integer;

begin

  Write("Введите строку: ");

  Readln(s);



  result := "";

  for i := 1 to Length(s) do

  begin

    if (s[i] <> "-") and (s[i] <> " ") then

      result := result + s[i];

  end;



  Writeln("Результат:", result);

end.

Совет: Помните, что строка в Паскале является массивом символов, поэтому мы можем использовать цикл для итерации по каждому символу и применить условия, чтобы исключить знаки тире и пробелы.

Задача на проверку: Напишите программу на Паскале, которая будет удалять все символы кавычек из введенной строки s.