Задан фрагмент текста. проверить, имеется ли в нем открывающих и закрывающих круглых скобок. рекомендации: должно существовать взаимно однозначное соответствие открывающих и закрывающих скобок, при котором открывающая скобка всегда предшествует соответствующей.

samiragubai samiragubai    3   17.03.2019 06:00    1

Ответы
daryachita daryachita  07.06.2020 02:48

var s:string; i,n:integer;

Begin

  read(s);

  for i := 1 to length(s) do begin

    if s[i]="(" then n=n+1;

    if s[i]=")" then n=n-1;

    if n<0 then begin

      Write("нет баланса");

      halt;

    end;

    Write("есть  баланс");

End

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика