Предмет: Информатика,
автор: Kattriine
дана строка ответить соответствует ли количество открывающих скобок закрывающим. пожалуйста решаю в паскале желательно с объяснением
Ответы
Автор ответа:
0
var a:string;
b,c,i:integer;
begin
readln(a);
for i:=1 to length(a) do begin
if a[i]='(' then inc(b);
if a[i]=')' then inc(c);
end; {после цикла переменная б - счетчик скобок"(", а с - ")"}
if b=c then writeln('Kolichestvo skobok odinakovo') else writeln('Kol-vo skobok ne odinakovo');
end.
Похожие вопросы
Предмет: Другие предметы,
автор: pozit274
Предмет: Русский язык,
автор: Аноним
Предмет: Алгебра,
автор: Fhurcfgh
Предмет: Химия,
автор: zinya2012
Предмет: Математика,
автор: свампирт