Вывести на экран результат соответствующий операции - Turbo Pascal

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

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

Ввести с клавиатуры 2 числа и знак арифметической операции (+ - / *). Вывести на экран результат соответствующий этой операции

Решение задачи: «Вывести на экран результат соответствующий операции»

textual
Листинг программы
var 
  a, b: integer;
  oper: char;
begin
  readln(a, b);
  readln(oper);
  case oper of
  '+' : writeln(a,oper,b,'=',a+b);
  '-' : writeln(a,oper,b,'=',a-b);
  '*' : writeln(a, oper,b,'=',a*b);
  '/' : writeln(a,oper,b,'=',a/b);
  end;
  readln;
end.

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

  1. Объявлены три переменные: a, b и oper типа integer и char соответственно.
  2. Введен ввод с клавиатуры двух чисел в переменные a и b.
  3. Введен ввод с клавиатуры оператора ('+', '-', '*' или '/') в переменную oper.
  4. Производится проверка значения переменной oper.
  5. Выводится на экран результат операции в зависимости от значения переменной oper.
  6. Завершается программа.

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

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