Написать програму к задачам 1) даны два ненулевых числа. Найти сумму, разность,…

var a,b: integer; sum, raz, pr, ch: real; beginreadln (a); readln (b); sum: =abs (a)+abs (b); raz: =abs (a) — abs (b); pr: =abs (a)*abs (b); ch: =abs (a) /abs (b); writeln (sum, raz, pr, ch); end.