Составьте программу печатающую значение true если указанное высказывание является истинным и false в противном случае числа a и b выражают длины катетоводного прямоугольного треугольника, а c и d - другого. эти треугольники являются подобными
var a, b, c, d: integer; begin writeln('Введите катеты a и b: '); read(a, b); writeln('Введите катеты c и d: '); read(c, d); if a / b = c / d then write(true) else write(false); end.
