Написать калькулятор со стандартными действиями(+ - * /) - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

не могли бы еще помочь с написанием калькулятора со стандартными действиями(+ - * /)?

Решение задачи: «Написать калькулятор со стандартными действиями(+ - * /)»

textual
Листинг программы
var
 a, b, c: real;
 ch: char;
begin
 write('Введите первое число: ');
 readln(a);
 write('Введите второе число: ');
 readln(b);
 write('Выбирете действие(+, -, *, /): ');
 readln(ch);
  case ch of
   '+': c:=a+b;
   '-': c:=a-b;
   '*': c:=a*b;
   '/': c:=a/b;
  end;
 writeln('Результат: ', c);
end.

Объяснение кода листинга программы

  1. В начале кода объявляются три переменные типа real - a, b и c, а также переменная типа char - ch.
  2. Затем пользователю предлагается ввести первое число с помощью функции readln(a).
  3. После этого пользователю предлагается ввести второе число с помощью функции readln(b).
  4. Далее пользователю предлагается выбрать действие из списка (+, -, *, /) с помощью функции readln(ch).
  5. В случае выбора действия +, результат вычисления a + b присваивается переменной c.
  6. В случае выбора действия -, результат вычисления a - b присваивается переменной c.
  7. В случае выбора действия *, результат вычисления a * b присваивается переменной c.
  8. В случае выбора действия /, результат вычисления a / b проверяется на деление на ноль и присваивается переменной c.
  9. Наконец, результат вычисления c выводится на экран с помощью функции writeln('Результат: ', c).
  10. Если во время выполнения программы была допущена ошибка, программа завершается с сообщением об ошибке.

Оцени полезность:

5   голосов , оценка 4 из 5
Похожие ответы