Длины сторон первого прямоугольника А и В, его площадь в 6 раз меньше площади второго прямоугольника. Найти длину стороны второго треугольника, если длина одной из его сторон равна С.(Составить алгоритм)

var a,b,c,d:real;beginwriteln ('Введите длины сторон первого прямоугольника');read (a,b);writeln ('Введите длину одной стороны второго прямоугольника');read (c);d:=(6*a*b)/c; //Из формулы s2/s1=6 ; c*d/a*b=6writeln ('Длин другой стороны второго прямоугольника = ',d)end.