Дана строка. Удалить все символы «а». Использовать рекурсивную процедуру - PascalABC.NET

  1. Дана строка. Удалить все символы «а». Использовать рекурсивную процедуру.


textual

Код к задаче: «Дана строка. Удалить все символы «а». Использовать рекурсивную процедуру - PascalABC.NET»

procedure p(var s: string; c: char);
begin
  if pos(c, s) = 0 then exit;
  delete(s, pos(c, s), 1);
  p(s, c);
end;
 
// вызывать так:
  p(s, c);
  writeln(s);

СДЕЛАЙТЕ РЕПОСТ

11   голосов, оценка 3.909 из 5



Похожие ответы
  1. Нужно удалить любую строку двумерного массива, без процедур.

  1. Дана строка символов(текст). Составить программу, удаляющую из строки все слова, которые являются палиндромами. Палиндром - это слово, которое одинаково читается слева направо и справа налево. Разделителями слов в строке считать символы: пробел, точка, запятая.

  1. Даны текстовый файл f . Удалить из файла все слова , длина которых равна N.Добавлено через 3 часа 40 минут Срочно помогите

  1. Создать текстовый файл, состоящий из случайного количества (не более 30-и) строк. В каждой строке файла содержится случайное количество (не более 20-и) слов, разделенных пробелами. Каждое слово состоит из случайного количества (не более 8-и) строчных латинских букв. Найти в файле строку, содержащую первое по алфавиту слово, и удалить ее (если таких строк несколько, то удалить все).

  1. Дана непустая строка. Вывести коды её первого и последнего символа.

  1. Значит есть файл типа Char, нужно записать туда любые символы, кроме 0 (0 терминал). Нахожу в нем первую глас. и последнюю согл., нахожу их позиции и после этого нужно удалить всё, что находится между ними и записать оставшиеся символы в файл. Собственно с этим у меня и проблема, не знаю как удалить из этого файла всё, что находится между ними, сказали, что это можно сделать просто путем перемещения символов с последнего согласного и далее к началу первой согласной, а потом удалить оставшийся хвост через Truncate, но может можно и по-другому. Не используя дополнительных файлов, а буквы искать только английские. Вот код:

  1. Пожалуйста, помогите решить задачу:Из заданного текста удалить последовательность символов, расположенных между двумя парными двоеточиями.

  1. Создать текстовый файл, состоящий из случайного количества (не более 30-и) строк. В каждой строке файла содержится случайное количество (не более 20-и) целых чисел, разделенных пробелами. Найти в файле строку, содержащую минимальное число и удалить ее (если таких строк несколько, то удалить все).

  1. Создать текстовый файл, записать туда строку с любыми символами. Найти В ФАЙЛЕ первую гласную из этой строки, последнюю согласную и удалить все, что находится между ними. Затем перезаписать получившийся результат в текстовый файл. Рабочие (дополнительные) файлы не использовать. Работать с маленькими английскими буквами (в англ. буквах искать согласную и гласную, а не в русских). Помогите, пожалуйста, никак не могу сообразить как это сделать...