НАЙДИТЕ КВАДРАТ Наивеличайшего ИЗ ЧИСЕЛ А И B. ВЫВЕДЕТЕ Итог Сопоставленья

В задании сказано "Выведите РЕЗУЛЬТАТ сопоставленья на экран". Сравнения чего конкретно, ясно из предшествующего предложения - квадратов чисел.
Как же может смотреться результат сопоставления 2-ух чисел? Уж окончательно, не как значение большего из их. Сравнение указывает соотношение меж сравниваемыми величинами.
Кстати, о числах совсем не сказано, что они целые, потому в данном, (ординарном) случае, превосходнее избирать вещественный тип, как более общий.

Ниже приведен один из вероятных вариантов.

var
  a,b,a2,b2:real;
begin
  Write('Введите 1-ое число: '); Read(a);
  Write('Введите 2-ое число: '); Read(b);
  a2:=a*a; b2:=b*b;
  Write('Квадрат первого числа [',a2,'] ');
  if a2gt;b2 then Write('больше квадрата')
  else
    if a2=b2 then Write('равен квадрату')
    else Write('меньше квадрата');
  Writeln(' второго числа [',b2,']')
end.

Пример работы программки
Введите первое число: 13.7
Введите 2-ое число: -14.2
Квадрат первого числа [187.69] меньше квадрата второго числа [201.64]

Еще один пример представлен во вложении.

Принципе у тебя все верно. Только в условии задачки не сказано, чтоб выводить большее число, потому можно сходу же квадрат вывести. У меня вышло так