Вычисление введенной пользователем арифметической операции

Posted by obzor under Delphi

Даны два числа и операция словом, которую с этими числами нуна провести.
plus — Сложение
minus — вычитание
div — Целое от деления
mod — Остаток от деления
mult — умножение.

Напишите программу, что вычисляет данные числа путем этих операций

Вход: 2 числа «а» и «б» и оператор словом через пробел
Выход: Результат арифметической операции.

Niro

var a,b: integer;
 s: string;

begin
 clrscr;
 writeln ('Vvedite dva chisla i operacii');
 read (a,b,s);
 if s='plus' then rez:=a+b;
 if s='minus' then rez:=a-b; 
 {тут аналогично}
 writeln ('Rezultat = ',rez);
 readln;
end.

тема на форуме

Похожие статьи

• Способы передачи параметров в подпрограммы в Delphi
• Описать функцию Pi(eps), вычисляющую значение числа Пи по формуле
• Вычислить методом касательных (Pascal)
• Ввести номер одного из друзей и вывести его имя (задача на записи)
• Найти сумму элементов массива, стоящих после последнего нулевого элемента
• Вычисление формулы с произведениями
• Можно ли среди чисел массива найти две разных пары чисел, суммы которых одинаковы?
• Определить, является ли массив «магическим квадратом»
• Создать таблицу умножения
• Обработка строк (Pascal)