Найдите квадрат наивеличайшего из чисел a и b. Выведите итог сопоставленья

program zz1;
var a,b,kv:integer; //задаем переменные целого типа
begin
write(введите 1-ое число ); //вводим с клавиатуры 1-ое заданное число
read(a);
write(введите 2-ое число ); //вводим с клавиатуры 2-ое заданное число
read(b);
if agt;b then kv:=sqr(a) else kv:=sqr(b); //проверяем, если 1-ое число больше, то возводим его в квадрат, если нет, то 2-ое
if agt;b then writeln(agt;b) else writeln(alt;b);//проверяем, если первое число больше, то выводим на экран 1-ый результат сравнения, если нет, то 2-ой
end.