Pascal. Задача 2-6

Пользователь вводит число, арифметическую операцию (Знаки + - * /) и второе число. Вывести результат.

Примечание: Знак операции должен иметь тип Char.

Решение

var
  a, b : real;
  c : char;
begin
  writeln('Введите первое число');
  read(a);
  writeln('Введите операцию');
  read(c);
  writeln('Введите второе число');
  read(b);
  if c = '+' then writeln(a + b)
  else if c = '-' then writeln(a - b)
       else if c = '*' then writeln(a * b)
            else if c = '/' then writeln(a / b);
end.