• С клавиатуры вводится число a - катет прямоугольного треугольника. Второй катет на 5 единиц длиннее. Найти c - гипотенузу этого треугольника.
    Решите, пожалуйста, в Pascal. И объясните, как.

Ответы 1

  • var a,b,c:real;

    begin

    write('a = ');

    readln(a);

    b:=a+5;

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

    writeln('c = ',c:4:2);

    end.

    Пример:

    a = 3

    c = 8.54

    • Автор:

      erin67
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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