С клавиатуры выводятся радиус круга и сторона квадрата. Определить что больше площадь круга или площадь квадрата

Question

С клавиатуры выводятся радиус круга и сторона квадрата. Определить что больше площадь круга или площадь квадрата

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var r, a : real; begin read (r, a); if pi * sqr (r) > sqr (a) then writeln ('Kruga') else if pi * sqr (r) < sqr (a) then writeln ('Kvadrata') else writeln ('='); end.