Длины сторон первого прямоугольника а,b. его площадь в 6 раз больше площади второго прямоугольника. найдите длину стороны второго прямоугольника, если длинна одной из его сторон 6.

Var a,b,c:real;
begin
writeln('Введите длину 1 стороны 1 прямоугольника');
readln(a);
writeln('Введите длину 2 стороны 1 прямоугольника');
readln(b);
c:=((a*b)/6)/6;
writeln('Длина 2 стороны 2 прямоугольника равна ',c);
end.