Составить программу для паскаля: Возведение суммы любых двух чисел в квадрат

Предыдущий
вопрос Следующий
вопрос

program SumSquare;

var
num1, num2, sum, square: integer;

begin
write('Введите первое число: ');
readln(num1);
write('Введите второе число: ');
readln(num2);

sum := num1 + num2;
square := sum * sum;

writeln('Сумма чисел ', num1, ' и ', num2, ' равна ', sum);
writeln('Квадрат суммы равен ', square);

end.