Курсовая работа: Создание программы-переводчика текстов с английского на русский язык

else

if (n=0) or (st3 [n]='(') or (st3 [n]='+') or (st3 [n]='-') then

st3:=st3+st1 [i];

end

else

if (st1 [i]='+') or (st1 [i]='-') then

begin

n:=Length(st3);

if (st3 [n]='(') or (n=0) then

st3:=st3+st1 [i]

else

if (st3 [n]='^') or (st3 [n]='*') or (st3 [n]='/') then

begin

st2:=st2+st3 [n];

Delete (st3, n, 1);

Goto 1;

end

else

begin

st2:=st2+st3 [n];

Delete (st3, n, 1);

st3:=st3+st1 [i];

end;

end

else

if st1 [i]= ')'then

begin

n:=Length(st3);

if n=0 then