Напишите программу калькулятор в pascalabs.

Question

Информатика

Машаня

15 ноября, 21:31

Напишите программу калькулятор в pascalabs.

+1

Ответы (1)

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

Игорюха · Answer 1

Program Maz; var a, b:integer; rez:real; p:char; begin write ('Введите а = ') ; readln (a) ; write ('Введите символ: ') ; readln (p) ; write ('Введите b = ') ; readln (b) ; case p of '+': rez:=a+b; '-': rez:=a-b; '*': rez:=a*b; '/': rez:=a/b; end; writeln (a, p, b,' = ', rez) ; end.