Помогите пожалуйтса решить задачу по информатике через Паскаль: z=

var z, t, k, m, x, y: real; begin readln (t, k, m, x, y); z: =sqr (sqr (t) -sqr (k) /sqr (sqr (m) — (sqr (sqr (t)*t)+sqrt (abs (sqrt (x)+y) / (12-abs (x)+4); writeln (z); end.