Задать вопрос Регистрация
Помочь другим

  • Составить программу на языке Паскаля: Даны числа a,b,c. Составить программу, выводящую на экран сообщение, в зависимости от того какой треугольник можно построить с такими длина сторон: равносторонний,равнобедренный или какой либо другой.

Ответы 1

  • var a,b,c: integer;

    begin

      readln(a,b,c);

      if (a>b+c) or (b>a+c) or (c>a+b) then begin writeln('Треугольник не сущесвует'); exit; end;

      if (a=b) or (b=c) or (a=c) then writeln('Равнобедренный треугольник');

      if (a=b) and (b=c) and (a=c) then writeln('Равносторонний треугольник');

      if (sqr(c)=sqr(a)+sqr(b)) or (sqr(b)=sqr(c)+sqr(a)) or (sqr(a)=sqr(b)+sqr(c)) then writeln('Прямоугольный треугольник');

    end.

    • Автор:

      nibby
    • 6 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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