На берегу бурной реки встретились горилла с двумя детьми и шимпанзе с двумя детьми. к берегу прибилось бревно, которое вмещает только двух обезьян, но, во-первых, бревном могут только взрослые особи, а во-вторых, если на бревне или на берегу горилл будет больше, чем шимпанзе, то они их съедят. как всем обезьянам благополучно переправиться? запишите алгоритм переправы.​

У 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.

1) Информационные ресурсы — это всякая информация, зафиксированная в любой форме, на любом материальном носителе. Все ресурсы, кроме информационного, после их многократного использования исчезают. А информационным ресурсом можно пользоваться всегда. Однако и информационные ресурсы имеют большую значимость.
2) К информационным ресурсам можно относить все научно-технические знания, произведения литературы и искусства, множество другой информации общественно-государственной значимости.
3) Для меня лучший информационный ресурс- это книги. Это касается не только школьной литературы, но и книг, которые подготавливают к будующей профессии. Большую часть своих знаний я получаю именно из них, развивая зрительную память.