Не получается компилировать программу на паскале Выходит ошибка из-за 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.
223
499
Ответы на вопрос:
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.
Популярно: Информатика
-
Demongirl101.03.2020 06:15
-
tibeck12011.01.2022 06:04
-
cote1801.02.2020 17:48
-
stanstan19926.01.2021 08:12
-
kryukova2002307.03.2023 08:54
-
kseniasmirnova318.09.2021 07:32
-
arshavin109921.06.2020 06:12
-
ЗнанияПом123411.07.2020 07:44
-
даша1500королева15.01.2023 00:37
-
zar2615.05.2022 18:06