Составьте программу печатающую значение true если указанное высказывание является истинным и false в противном случае числа a и b выражают длины катетов одного прямоугольного треугольника, а c и d - другого. эти треугольники являются подобными

Question

Информатика

Галинка

29 августа, 00:39

Составьте программу печатающую значение true если указанное высказывание является истинным и false в противном случае числа a и b выражают длины катетов одного прямоугольного треугольника, а c и d - другого. эти треугольники являются подобными

+2

Ответы (1)

Знаете ответ на вопрос?

Панкрат · Answer 1

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.