Учеба и наука

Решено

Написать программу - вопрос №437230

Написать программу: Даны произвольные числа a, b и с. Если нельзя построить треугольник с такими длинами сторон, то напечатать 0, иначе напечатать 3, 2 или 1 в зависимости от того, равносторонний это треугольник, равнобедренный или какой-нибудь иной.

октябрь 24, 2012 г.

  • Всего ответов: 1

  • Валентина - аватарка

    Валентина

    3-й в

    program treug;

    var a,b,c:integer;

    begin

    writeln('vvedite a,b,c');

    readln(a,b,c);

    if (a+b<=c) or (b+c<=a) or (a+c<=b) then writeln(0)

    else

      if (a=b) and (b=c) then writeln(3)

         else if (a=b) or (b=c) or (a=c) then writeln(2)

                 else writeln(1) ;

    readln

    end.

    Буду благодарна, если отметите 

    октябрь 24, 2012 г.
    Ответ понравился автору
    Лучший ответ по мнению автора

Похожие вопросы

Решено

Как вы понимаете смысл фразы...

декабрь 16, 2013 г.

Учеба и наука

кубейсик

март 2, 2012 г.

Учеба и наука