Для записи алгоритмов используют
три алгоритмические конструкции.
Назови их и подпиши Их. программа Паскаль​

Цифровой гироскопический датчик предназначен для измерения угла и

направления вращения робота, а также скорости его вращения. Точность

измерения составляет +/-30 , максимальная скорость проведения измерений

4400/сек., частота опроса датчика 1кГц.

Будучи включенным, при длительном нахождении робота в неподвижном

состоянии, определяемое значение угла не остаётся постоянным, а ошибочно

меняется или дрейфует. Поэтому, чем больше времени проходит от начала

первого обращения к гироскопическому датчику до чтения показаний, тем

менее точным становятся результаты за счёт систематического накопления

ошибки. Поэтому перед началом каждого измерения всегда необходимо

производить обнуление угла при режима Сброс.

Сорян, это всё что я знаю о лего

Рекурсивный подход.(Символы тоже удаляет)
function grad(s:string):string;
var
i:byte;
detect:boolean;
begin
while i < length(s) - 2 do
begin
inc(i);
if (s[i] = s[i+1]) and (s[i] = s[i+2]) then {проверка последовательности из 3 елементов}
begin
delete(s,i,3); {если да - удаляем их}
detect:=True; {логическая переменная регистрирует изменение строки}
end;end;
if detect = True then
s:=grad(s); {если строку изменили , проверяем не появились ли там еще последовальности}
grad:=s; 
end;

var
s:string;
begin
readln(s);
writeln(grad(s));
end.