Как составить программу вычисления?

У={ х2 – 2, если х< либо = 4 разделить на Х2 – 2х + 4, если х > 4как подставить эти значения ?

vara,b : integer;beginwriteln('vvedite 1 chislo')readln(a)writeln('vvedite 2 chislo)readln(b)writeln(a + b)end.