Помогите пожалуйста сделать линейное неравенство!!! Извесны площади двух разных кругов...

Question

Помогите пожалуйста сделать линейное неравенство!!! Извесны площади двух разных кругов ,радиус и диаметр большого круга взять за стороны прямоугольника. Вычислить площадь прямоугольника.

Answer 1

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018

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

begin

 var (s1, s2) := ReadReal2('Введите площади кругов:');

 Println('Площадь прямоугольника равна ', 2 * Max(s1, s2) / Pi)

end.

Введите площади кругов: 46.13 41.52

Площадь прямоугольника равна  29.3672700993165