• Помогите, пожалуйста составить алгоритм нахождения площади прямоугольного треугольника в программе Паскаль. 

Ответы 1

  • Program 7e;Uses crt;const N=25;var a,b,i: integer; {a,b-катеты}s,c: real; {s - площадь, c - гипотенуза}BeginWriteln('Введите длину первого катета');Read(a);Writeln('Введите длину второго катета');Read(b);c:=sqrt(sqr(a)+sqr(b));s:=a*b/2;for i:=1 to N do writeln;writeln('Длина гипотенузы =',c);writeln('Площадь треугольника =',s);end.

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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