Pascal:
y := (5*sqr(x) - 2 * x + 1) / (3 * x - 2);
m := sqrt((3 * sqr(a) + b) / (2 * a - b)) - (2 * a + b) / (3 * a * b);
y := sqr(sin(x / 3)) + sqr(cos(abs(x - y)));
(x + y) / 2 <> sqr(x + 3);
p_1 := sqrt(abs(sqr(x) + 2 * x + 1) / (3 * x * y) + 2 * x * y) - (abs(x + 2 * y)) / 2 * x * sqr(y);