Question

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

Answer 1

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 Sqr((ReadReal + ReadReal + ReadReal).Print).Print

end.

Пример

143 -24.63 14

132.37 17521.8169

Answer 2

Для написания программы на Pascal, которая задает три числа, считает их сумму и находит квадрат этой суммы, можно использовать следующий код:

pascalCopy code
program SumAndSquare;

var
  num1, num2, num3, sum, squareSum: Integer;

begin
  writeln('Введите три числа:');
  readln(num1, num2, num3);

  sum := num1 + num2 + num3;
  writeln('Сумма чисел:', sum);

  squareSum := sum * sum;
  writeln('Квадрат суммы:', squareSum);

  readln; // Чтобы программа не закрывалась сразу после выполнения
end.

Скопируйте этот код в среду разработки Pascal (например, Free Pascal) и запустите программу. После запуска она попросит вас ввести три числа, вычислит их сумму и квадрат суммы, и выведет результаты на экран.