Grammar 2Unless, in case, as long asLook again at Grammar database 14, Student's1 Complete the sentences using unless, in case or as long as.1 You can't connect to the internet_you have a modem._I finish my homework first, my parents don't mind if I surf a little.​

Дано a=82_{16}, b=701_8. Выберите число с, записанное в двоичной системе, которое отвечает условию a<c<b.
Число в 16-ой и 8-ой системе очень легко записать в двоичное системе расписав каждую цифру числа на черыре цифры у 16-го числа и на три цифры у 8-го числа
Первое число 82(в 16)
8 =1000(в двоичной системе)
2= 0010
82 =10000010
Второе число 701(в 8 системе)
7=111( в двоичной системе)
0=000
1=001
701=111000001
Данные системы счисления относятся к позиционным поэтому вес каждой цифры зависит от ее положения
Число с удолетворяющее условию a<c<b равняется 11010111
11010111(2) =327(8)=D7(16)

У if'ов небыло begin и end;
у значений массива n небыли проставленны ' ' одинарные кавычки для букв.
у b и v в условиях не те типы данных, поэтому немогут они внутрь себя вместить букву, а только цифры, исправил с integer на char.
не знаю что должна выводить программка, begin и end'ов нету и у циклов. Без begin и end'ов трудно мне просчитать что выведет программа.

Program shifer;var z,a,m,s,j,x:integer;b,v:char;k:array[1..100] of char;n:array[1..100] of char;BEGINn[1]:='а';n[2]:='б';n[3]:='в';n[4]:='г';n[5]:='д';n[6]:='е';n[7]:='ё';n[8]:='ж';n[9]:='з';n[10]:='и';n[11]:='й';n[12]:='к';n[13]:='л';n[14]:='м';n[15]:='н';n[16]:='о';n[17]:='п';n[18]:='р';n[19]:='с';n[20]:='т';n[21]:='у';n[22]:='ф';n[23]:='х';n[24]:='ц';n[25]:='ч';n[26]:='ш';n[27]:='щ';n[28]:='ъ';n[29]:='ы';n[30]:='ь';n[31]:='э';n[32]:='ю';n[33]:='я';n[34]:='а';n[35]:='б';n[36]:='в';readln(a);for m:=1 to a do  readln(b);  for j:=1 to 33 do     x:=0;    if b=n[1+x] then      begin        v:=n[1+x+3];        z:=0;        k[1+z]:=v;        z:=z+1;      end    else      begin        x:=x+1;      end;  writeln(k);END.