Даны два числа а и b. Вывести на экран квадрат каждого числа, в сообщении на экране должно быть видно, что это квадрат
Помогите пожалуйста

var a,b: Integer;
begin
writeln('Введите число a:');
readln(a);
writeln('Введите число b:');
readln(b);
writeln(a,'² = ',a*a);
writeln(b,'² = ',b*b);
end.