• Предмет: Информатика
  • Автор: YanaBazilevich
  • Вопрос задан 10 лет назад

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

Ответы

Ответ дал: Royal21
0
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.
Похожие вопросы