korotinadasha07
?>

? 1. Программалау жүйесі деген не?2. Программалау жүйесі нені қамтиды?3. Қандай танымал программалау жүйесін білесіңдер?4. Программаны құру үшін қандай компоненттер қажет?5. Программалау жүйесінің негізі неліктен тіл болып табылады?6. Қандай программалау тілдерін білесіңдер?7. Программалау жүйесінің құрамына не кіреді?8. Түрлі программалау тілдерінің ерекшелігі неде?9. Программалау тілдері мен программалау жүйесі арасындағы ерекшелікам-неде? памаги ​

Информатика

Ответы

deshkina82
Var s:string;
n,k,i:integer;
begin
for n:=1 to 2 do
 begin
 writeln('Введите строку ',n,':');
 readln(s);
 k:=0;
 for i:=1 to length(s) do
  begin
  case s[i] of
   '[': k:=k+1;
   ']': k:=k-1;
   end;
  end;
 if k=0 
 then writeln('В строке ',s,' количество [ и ] одинаково')
 else writeln('В строке ',s,' количество [ и ] не одинаково');
 end;
end.

Пример:
Введите строку 1:
c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c
В строке c:=a[imax,j]; a[imax,j]:=a[imin,j]; a[imin,j]:=c количество [ и ] одинаково
Введите строку 2:
Просто [ пример ]] со [[ скобками
В строке Просто [ пример ]] со [[ скобками количество [ и ] не одинаково

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

? 1. Программалау жүйесі деген не?2. Программалау жүйесі нені қамтиды?3. Қандай танымал программалау жүйесін білесіңдер?4. Программаны құру үшін қандай компоненттер қажет?5. Программалау жүйесінің негізі неліктен тіл болып табылады?6. Қандай программалау тілдерін білесіңдер?7. Программалау жүйесінің құрамына не кіреді?8. Түрлі программалау тілдерінің ерекшелігі неде?9. Программалау тілдері мен программалау жүйесі арасындағы ерекшелікам-неде? памаги ​
Ваше имя (никнейм)*
Email*
Комментарий*