program calc;

{$APPTYPE CONSOLE}

uses
  SysUtils;
  var s1,s2:string;

procedure v( var s:string);
var
n,i,j,k:integer;
a,b,d:integer;
c:array[1..4] of char;
begin
c[1]:='*';
c[2]:='/';
c[3]:='+';
c[4]:='-';
for n:=1 to  4 do begin
while pos(c[n],s)<>0 do begin
i:=pos(c[n],s);
k:=i+1;
while(s[k] in ['0'..'9'])and(k<=length(s))do k:=k+1;
//writeln(copy(s,i+1,k-i-1));
//readln;
a:=strtoint(copy(s,i+1,k-i-1));
j:=i-1;
while(s[j] in ['0'..'9'])and(j>=1)do j:=j-1;
//writeln(copy(s,j+1,i-j-1));
//readln;
b:=strtoint(copy(s,j+1,i-j-1));
if c[n]='*' then d:=a*b;
if c[n]='/' then d:=b div a;
if c[n]='+' then d:=a+b;
if c[n]='-' then d:=b-a;
delete(s,j+1,k-j-1);
insert(inttostr(d),s,j+1);
//writeln(j,' ',k,' ',s);
//readln;
end;
end;
// writeln(s);

end;


   begin

s1:='2+3*2';
   {дужки}
v(s1);
writeln(s1);
readln;
readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.