• Вычислить периметр и площадь прямоугольного треугольника по заданным длинам двух катетов a и b. Написать блок схему и программу на языке Паскаль

    Pascal

Ответы 1

  • Program xxx; Var a, b, c, p, s : real;Begin wtiteln('введите катет а-'); read(a); wtiteln('введите катет b-'); read(b); s:=(a*b)/2; writeln('площадь треугольника =', s); c:=sqrt(sqr(a)+sqr(b)); p:= a+ b + c; writeln('периметр треугольника =', p); end.
  • Добавить свой ответ

Войти через Google

или

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

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

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