Задать вопрос
21 января, 06:03

Сделать программу в Паскале АБС по следующей задаче.

Найти стороны прямоугольного треугольника, если катит больше другого в 2 раза.

+2
Ответы (1)
  1. 21 января, 08:44
    0
    Var

    a, b, c:real;

    begin

    Write ('Введите длину меньшего катета - > ') ; Readln (a) ;

    b:=2*a; c:=sqrt (a*a+b*b) ;

    Writeln ('Длина большего катета ', b,', длина гипотенузы ', c)

    end.

    Тестовое решение:

    Введите длину меньшего катета - > 15.63

    Длина большего катета 31.26, длина гипотенузы 34.9497424883217
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Сделать программу в Паскале АБС по следующей задаче. Найти стороны прямоугольного треугольника, если катит больше другого в 2 раза. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы