запишите по правилам языка паскаль следующие выражения:

A) (12+c) / 158 + 12,3x

Б) 1/7d - 3 / ( 10 + f(в квадрате))

varr1,r2:real;x,c,d,f:integer;beginread(c,x);r1:=(12+c)/(158*12.3*x);r2:=((1/7)*d-3)/(10+sqr(f));writeln(r1:2:3);writeln(r2:2:3);end.Если всю программу писать не нужно, то напиши то, что идёт после 'r1=' и 'r2='