Вводится строка, представляющая собой строку из программы Pascal с комментарием. Комментарий — последовательность символов, заключённая в фигурные скобки { }. Составьте программу удаления комментария.

Можно пройти по строке слева направо и не выводить символы, которые находятся внутри фигурных скобок.

Программа на Pascal:
var
s, r: string;
i: integer;
inside: boolean;
begin
readln(s);
r := '';
inside := false;
for i := 1 to length(s) do
begin
if s[i] = '{' then
inside := true
else if s[i] = '}' then
inside := false
else if not inside then
r := r + s[i];
end;
writeln(r);
end.

Переменная inside показывает, находимся ли мы сейчас внутри комментария. Если да, символы не добавляются в результат.

0 0 Пожаловаться