Строка: удалить из строки каждый символ, кратный n, при этом символы справа от удаленного сдвигаются влево - Pascal ABC

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

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

Нужно написать программу, которая удаляет из введенной строки каждый символ, кратный n, при этом символы справа от удаленного сдвигаются влево

Решение задачи: «Строка: удалить из строки каждый символ, кратный n, при этом символы справа от удаленного сдвигаются влево»

textual
Листинг программы
for i:=length(s) downto 1 do
if i mod n=0 then delete(s,i,1);

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

В данном коде используется цикл for, который проходит по каждому символу строки s, начиная с индекса length(s) и до 1. Внутри цикла проверяется условие i mod n=0, то есть делится ли индекс на n без остатка. Если это условие выполняется, то вызывается функция delete(s,i,1), которая удаляет символ с индексом i из строки s. Таким образом, каждый символ, кратный n, удаляется из строки.

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

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