Не получается компилировать программу на паскале Выходит ошибка из-за else, пишет, что встречено else, а ожидался оператор.
Вот программа:

var s:='2'+'8'*99+'2';
begin
while (pos('81',s)<>0) or (pos('882',s)<>0) or (pos('8883',s)<>0) do begin
var i81:=pos('81',s);
var i882:=pos('882',s);
var i8883:=pos('8883',s);
if i81<>0 then begin
delete(s,i81,2);
insert('2',s,i81);
else
if i882<>0 then begin
delete(s,i882,3);
insert('3',s,i882);
else
delete(s,i8883,4);
insert('1',s,i8883);
end;
end;
end;
end.

201

206

Посмотреть ответы 2

Ответы на вопрос:

Nika31303

Информатика

4,8(71 оценок)

var s:='2'+'8'*99+'2';

begin

while (pos('81',s)<>0) or (pos('882',s)<>0) or (pos('8883',s)<>0) do

begin

var i81:=pos('81',s);

var i882:=pos('882',s);

var i8883:=pos('8883',s);

if i81<>0 then

begin

delete(s,i81,2);

insert('2',s,i81)

end

else

if i882<>0 then

begin

delete(s,i882,3);

insert('3',s,i882);

end

else

delete(s,i8883,4);

insert('1',s,i8883);

end;

end.

lipun2004

Информатика

4,7(36 оценок)

Если n - количество рядов в каждом из залов, m - количество мест в каждом ряду, то количество информации в билете = log(2)4 + log(2)n + log(2)m

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.