abaika
Опубликовано 6 лет назад по предмету Информатика от abaika


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

  1. Ответ
    Ответ дан spyric

    Pascal:

     

    program strings;

    uses crt;

    var i,open,close:integer;

    a:String;

    begin

    open:=0;

    end:=0;

    clrscr;

    write('Введите строку: '); readln(a);

    for i:=1 to length(a) do

    begin

    if a[i]='(' then open:=open+1;

    if a[i]=')' then close:=close+1;

    end;

     

    writeln('Открывающихся скобок: ', open, ' штук');

    writeln('Закрывающихся скобок: ', close, ' штук');

    readln;

    end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц