Задать вопрос
ИнформатикаИнформатика
12 августа, 18:20

в паскале Запросить

с клавиатуры 3 стороны треугольника и

по ним определить, является ли он

прямоугольным, сообщение вывести на

экран.

Подсказка.

Для каждой стороны применить теорему

Пифагора и проверить, выполняется ли

она. Если выполняется, то треугольник

является прямоугольным. Переменные

должны быть целыми числовыми. Функция

квадрата - sqr (x), корня квадратного -

sqrt (x). Программу проверить при сторонах

3, 4, 5 - прямоугольный, а 4, 5, 6 - не

прямоугольный.

+4
Ответы (1)
  1. 12 августа, 21:33
    0
    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.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «в паскале Запросить с клавиатуры 3 стороны треугольника и по ним определить, является ли он прямоугольным, сообщение вывести на экран. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » в паскале Запросить с клавиатуры 3 стороны треугольника и по ним определить, является ли он прямоугольным, сообщение вывести на экран. Подсказка. Для каждой стороны применить теорему Пифагора и проверить, выполняется ли она.
Регистрация Забыл пароль