Составить программу в которой задаются 3 числа , считается их сумма , а далее находится квадрат этой суммы.(ПАСКАЛЬ)

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

program CalculateSquare;
var
a, b, c, sum, square: integer;
begin
// вводим три числа
writeln('Введите три числа:');
readln(a);
readln(b);
readln(c);

// считаем сумму
sum := a + b + c;

// находим квадрат суммы
square := sum * sum;

// выводим результат
writeln('Сумма чисел: ', sum);
writeln('Квадрат суммы: ', square);
end.