Второе задание ответ : 2)
Первое задание ответ: разрядность 6
Var
x, y, z, a, b: real;
begin
readln(x, y, z);
a := x * x * x * sqr(Tan(sqr(x + y))) + z / sqrt(x + z);
b := (y * x * x - z) / (exp(z * x) - 1);
writeln('a=', a);
writeln('b=', b);
end.
65(8)=53(10)< 53(7)=38(10)