Предмет: Информатика,
автор: Medina95
СРОЧНО! Напишите код в ТУРБО паскаль, пожалуйста.
Проверить,
одинаковое ли число открывающихся и закрывающихся скобок в данной строке.
Ответы
Автор ответа:
0
program abc;var a, b, i: integer; s: string;begin a := 0; b := 0; read(s); for i := 1 to length(s) do begin if s[i] = '(' then inc(a) else if s[i] = ')' then inc(b); end; if a = b then writeln('Одинаковое.') else writeln('Разное.');end.
Интересные вопросы
Предмет: Физкультура и спорт,
автор: shestakovalesia04
Предмет: Другие предметы,
автор: Аноним
Предмет: Математика,
автор: woopsoulana
Предмет: Математика,
автор: хахарик