• Написати програму, що за довжинами сторін трикутника визначає який він (рівнобедрений, рівносторонній чи довільний)./Написать программу, по длинам сторон треугольника определяет какой он (равнобедренный, равносторонний или произвольный).

Ответы 1

  • Var   a,b,c:real;BeginWrite('Введите длины сторон треугольника: ');ReadLn(a,b,c);if (a<b+c)and(b<c+a)and(c<a+b) then   Begin   if (a=b)and(b=c) then WriteLn('Треугольник равносторонний')   else if (a=b)or(b=c)or(c=a) then WriteLn('Треугольник равнобедренный')        else WriteLn('Произвольный')   Endelse WriteLn('Треугольник не существует');End.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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