• с клавиатуры вводится 2 числа длинны катетов прямоугольного треугольника, вычислить перемитр и площадь треугольника?

Ответы 2

  • Спасибо большое!!:)
  • Var katOne, katTwo   :   integer;BeginWrite('Введите катеты');Readln(katOne, katTwo);if (katOne > 0) and (katTwo > 0) then   writeln('Площадь = ', katOne*katTwo/2, 'Периметр = ', katOne + katTwo + sqrt(katOne*katOne + katTwo*katTwo)else writeln('Error')Readln()End.
    • Автор:

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

Войти через Google

или

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

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

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