Каков был бы диапазон значений целых чисел, если
бы для их хранения использовалась 7-разрядная
ячейка? (определить диапазон в двух вариантах: со
знаком и без)

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

Проезжая на лошадях по дороге, автор встречает оборванного крестьянского мальчишку, за спиной которого висит котомка с книжками. Он идёт учиться. Некрасов решает подвести школьника, но тот только смущается. Автор обращается к своему юному спутнику, хотя и не ждет от него никаких ответов. Скорее, он хочет объяснить случайному собеседнику, что старания его родителей, отдавших последние деньги на обучение сына, не пропадут даром. Некрасов рисует перед крестьянским мальчишкой достаточно идиллическую картину, которую, тем не менее, подкрепляет фактами, и пророчит незнакомцу большое будущее. Возможно, он сможет повторить путь Ломоносова, этого «архангельского мужика», который «по своей и божьей воле стал разумен и велик». Поэт призывает сельского мальчонку не робеть, так как именно знания открывают перед ним все двери. Не исключено, что его юный собеседник сможет добраться до Москвы и станет учиться в университете, чтобы впоследствии принести своей стране гораздо большую пользу, чем избалованные дворянские отпрыски, которых поэт считает холодными, тупыми и напыщенными.

Источник: https://pishi-stihi.ru/shkolnik-nekrasov.html