
- площадь квадрата, вписанного в круг.
- площадь круга.
- диагональ квадрата.
- диаметр круга.
- сторона квадрата.
и
соответственно (ReadLn(S1, S2); ). Следующее действие программы - "A := SQRT(S1); " - не что иное, как вычисление длины стороны квадрата из площади(
). Далее - "Dg := A * SQRT(2); " - программа вычисляет диагональ квадрата, который ВПИСАН в круг, с формулы
.
, которая выведена из формулы площади круга: 