Даны две стороны прямоугольника а,b. напишите функцию,которая будет определять сторону квадрата k, соразмерного (одинакового) по площади данного прямоугольника s=a*b

laykutina laykutina    1   25.12.2019 05:26    1

Ответы
Вирс123 Вирс123  10.10.2020 23:06

PascalABC.NET

function Side(a, b: real) :=  Sqrt(a * b);

begin

var (a, b) := ReadReal2('Задайте стороны прямоугольника:');

Print('Сторона равновеликого ему квадрата равна', Side(a, b))

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика