даны два числа, вывести на экран квадрат большего из них

var a,b,a1,b1:integer;beginreadln(a,b);a1:=sqr(a);b1:=sqr(b);if a1>b1 then write(a1)else write(b1);end.

Конкретно я затупила на этой легкой программе, но все такиProgram kvadrat;var a,b:integer;beginwriteln('введите два числа');readln(a);readln(b);if (a>b) then begina:= a*a; write(a);end;If (a<b)thenbeginb:= b*b;write(b);end;end.