составить программу, которая считает в формуле, заданной с клавиатуры, количество открывающихся и закрывающихся круглых скобок
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
if a[i]='(' then open:=open+1;
if a[i]=')' then close:=close+1;
end;
writeln('Открывающихся скобок: ', open, ' штук');
writeln('Закрывающихся скобок: ', close, ' штук');
readln;
end.
В какой оболочке земли живёт большинство живых организмов?
Из каких неживых частей состоит экосистема
На какие расы делятся население земли
Определение статуса военнослужащего (краткий ответ!!)
Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.