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

program zz1;

var a, b, kv:integer; / /задаем переменные целого типа

begin

write ('введите первое число '); / /вводим с клавиатуры первое заданное число

read (a);

write ('введите второе число '); / /вводим с клавиатуры второе заданное число

read (b);

if a>b then kv:=sqr (a) else kv:=sqr (b); / /проверяем, если первое число больше, то возводим его в квадрат, если нет, то второе

if a>b then writeln ('a>b') else writeln ('a
end.