Даны три натуральных числа. напишите программу в паскале , определяющую , существует ли треугольник с такими длинами сторон. если такой существует , то определите его тип (равносторонний , равнобедренный, разносторонний) ! заранее .

283

299

Посмотреть ответы 2

Ответы на вопрос:

HrenSGori

Информатика

4,4(99 оценок)

Var a,b,c,k: integer; begin readln(a,b,c); if (a+b> c)and(b+c> a)and(a+c> b) then begin writeln('треугольник существует'); k: =1 end else writeln('треугольник не существует'); if (a=b)and(a=c) and (k=1) then writeln('равносторонний'); if =b)and(a< > c))or((c=b)and(c< > a))or((c=a)and(c< > (k=1) then writeln('равнобедренный'); if (a< > b)and(c< > b)and(a< > c)and (k=1) then writeln('разносторонний') end.