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

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.