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

Question

Информатика

Людаха

29 сентября, 03:47

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

+4

Ответы (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.