Даны три положительных числа. определить наибольшее из них.(построить блок-схему)

215

372

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

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

ivangladkikh

Информатика

4,6(43 оценок)

Var a,b,c: real; begin write('введите длину стороны a: '); readln(a); ' write('введите длину стороны b: '); readln(b); write('введите длину стороны c: '); readln(c); if (a+b < =c) or (b+c < = a) or (c+a < = b) then writeln('треугольника с такими сторонами не существует! ') else begin if (sqr(a)+sqr(b)> sqr(c))and(sqr(b)+sqr(c)> sqr(a))and(sqr(c)+sqr(a)> sqr(b)) then writeln('треугольник остроугольный') else if (sqr(a)+sqr(b)=sqr(c))and(sqr(b)+sqr(c)=sqr(a))and(sqr(c)+sqr(a)=sqr(b)) then writeln('треугольник прямоугольный') else writeln('треугольник тупоугольный'); end; end. объяснение, если a,b,c длины сторон теугольника, то a+b> c, b+c> a, c+a> b по теореме косинусов a^2+b^2-2abcos(c)=c^2? отсюда если угол c < 90? то cos(c)> 0 поэтому a^2+b^2> c^2