С клавиатуры вводится числа А, В, и целое число Х. Если Х=0, найти разность а-в, 1-а*в, 2-а: в, в противном случае найти сумму.

Question

Информатика

Анастасьюшка

14 февраля, 22:19

С клавиатуры вводится числа А, В, и целое число Х. Если Х=0, найти разность а-в, 1-а*в, 2-а: в, в противном случае найти сумму.

+1

Ответы (1)

Знаете ответ на вопрос?

Гога · Answer 1

Vara, b, x:integer; beginwriteln ('Введите 3 числа: ') ; readln (a, b, x) ; if x=0 then writeln ('a - b = ', a-b,' ','1 - a * b = ',1-a*b,' ','2 - a : b = ',2-a/b) elsewriteln (a+b) ; end.