мой калькулятор!

повторяю всем кто напишет коммент с примером передам привет и спрашу у своего калькулятора этот пример! Спускайся в низ 👇👇👇 и вот всё что нужно написать:program calculator; var a, b:Integer; q, w, e, r ,t:Char; begin q:='+'; w:='-'; e:='*'; r:='/'; WriteLn('введите пример') ; read(a); read(t); read(b); if t=q then write(a,'+',b,'=' , a+b); if t=w then write(a,'-',b,'=',a-b); if t=e then write(a,'*',b,'=',a*b); if t=r then write(a,'/',b,'=',a/b); end.