Удалить из строки все символы, стоящие на чётных местах - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.55/75:

@Дарюшка 1 / 1 / 0 Регистрация: 08.02.2012 Сообщений: 106

	Удалить из строки все символы, стоящие на чётных местах 08.09.2014, 22:27. Показов 14117. Ответов 1 Метки нет (Все метки) Составить программу, которая удаляет из строки все символы, стоящие на чётных местах.Заранее спасибо. 0

Лучшие ответы (1)

Сообщение: #6588774

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

08.09.2014, 22:27

Ответы с готовыми решениями:

удалите все символы, стоящие на чётных местах
Во введенной строке удалите все символы, стоящие на чётных местах.

Проверить, все ли буквы слова Х, стоящие на чётных местах, одинаковы
Строковый тип данных 9. Напишите программу, проверяющую, все ли буквы слова Х, стоящие на чётных местах, одинаковы.

Вывести на экран все элементы массива, стоящие на чётных местах
Ребята, помогите пожалуйсто, не могу решить задачки, а очень срочно нужны( завтра сдавать=(( 1) Дан массив из N элементов. Написать...

CodeR

Фрилансер

3418 / 2815 / 3000

Регистрация: 08.02.2012

Сообщений: 8,603

Записей в блоге: 1

09.09.2014, 10:31

Сообщение было отмечено Дарюшка как решение

Решение

Pascal
1
2
3
4
5
6
7
8
Var s:string;
    i:byte;
Begin
    write('Строка: ');readln(s);
    For i:=Length(s) downto 1 do
     if (i mod 2 = 0) then Delete(s,i,1);
    writeln(s);
End.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

09.09.2014, 10:31

Помогаю со студенческими работами здесь

Дана строка символов разделенных пробелом. Удалить все символы стоящие на четных местах
Дана строка символов разделенных пробелом.удалить все символы стоящие на четных местах Помогите пожалуйста решить задачу в паскале!!! ...

Из данного файла скопировать элементы, стоящие на нечётных местах, в один файл, стоящие на чётных - в другой
Дан типизированный файл целых чисел. Записать в первый выходной файл все числа, стоящие на нечетных позициях в файле, а в другой выходной...

В данном массиве поменяйте местами элементы, стоящие на нечётных местах, с элементами, стоящими на чётных местах
В данном массиве поменяйте местами элементы, стоящие на нечётных местах, с элементами, стоящими на чётных местах.

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

Удалить все слова, стоящие на чётных позициях.
дана строка произвольного текста состоящая из n-слов. Удалить все слова, стоящие на чётных позициях.

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .

Наверх