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

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:
Просто [ пример ]] со [[ скобками
В строке Просто [ пример ]] со [[ скобками количество [ и ] не одинаково