Задание:

Периметр квадрата равен P см. Составьте программу, которая вычисляет площадь S данного квадрата.

Решение: (PascalABC.NET):

begin

   var p: real := readreal('Введите периметр квадрата: ');

   var s: real := (p/4)**2;

   print('Площадь S данного квадрата равна', s, 'см^2');

end.

Объяснение:

Периметр квадрата — это сумма длин всех его сторон. Поскольку у квадрата все стороны равны, то периметр квадрата со стороной a равен P = 4a. Откуда следует, что сторона квадрата равна a = P/4.

Площадь квадрата вычисляется по формуле S = a². Следовательно, если мы периметр квадрата разделим на 4 и возведём полученное значение в квадрат, то мы получим площадь квадрата.