В задании сказано "Выведите РЕЗУЛЬТАТ сравнения на экран". Сравнения чего именно, ясно из предыдущего предложения - квадратов чисел.Как же может выглядеть результат сравнения двух чисел? Уж конечно, не как значение большего из них. Сравнение показывает соотношение между сравниваемыми величинами.Кстати, о числах вовсе не сказано, что они целые, поэтому в данном, (простом) случае, лучше выбирать вещественный тип, как более общий.Ниже приведен один из возможных вариантов.var a,b,a2,b2:real;begin Write('Введите первое число: '); Read(a); Write('Введите второе число: '); Read(b); a2:=a*a; b2:=b*b; Write('Квадрат первого числа [',a2,'] '); if a2>b2 then Write('больше квадрата') else if a2=b2 then Write('равен квадрату') else Write('меньше квадрата'); Writeln(' второго числа [',b2,']')end.Пример работы программыВведите первое число: 13.7Введите второе число: -14.2Квадрат первого числа [187.69] меньше квадрата второго числа [201.64]Еще один пример представлен во вложении.