•   в паскале Запросить
    с клавиатуры 3 стороны треугольника и
    по ним определить, является ли он
    прямоугольным, сообщение вывести на
    экран.

    Подсказка.
    Для каждой стороны применить теорему
    Пифагора и проверить, выполняется ли
    она. Если выполняется, то треугольник
    является прямоугольным. Переменные
    должны быть целыми числовыми. Функция
    квадрата - sqr(x), корня квадратного -
    sqrt(x). Программу проверить при сторонах
    3, 4, 5 - прямоугольный, а 4, 5, 6 - не
    прямоугольный.

Ответы 1

  • var  A, B, C : integer;begin  write('Введите A, B и C: ');  readln(A, B, C);  if (sqr(a) = sqr(b) + sqr(c)) or     (sqr(b) = sqr(a) + sqr(c)) or     (sqr(c) = sqr(b) + sqr(a)) then    writeln('Треугольник прямоугольный')  else    writeln('Треугольник не прямоугольный');end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years