uses crt;
var
   a, b : real;
   c : char;

begin
     clrscr;
     writeln('Введите число, знак, число. Все через пробел! Например, 2 + 2');
     readln(a, c, b);

     case c of
          '+': writeln(a + b);
          '-': writeln(a - b);
          '*': writeln(a * b);
          '/': if (b <> 0) then writeln(a / b) else writeln('На ноль делить нельзя!');
     end;
end.