Вычислите десятичные эквалиенты следующих чисел: 1. 1110001 в 2 степени 2. 317 в 8 степени 3. 21е в 16 степени

192

362

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

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

алина3798

Информатика

4,7(13 оценок)

Var a, b, c: real; begin writeln('введите два катета a,b и гипотенузу с треугольника'); readln(a, b, c); if (c > = a + b) or (a + b + c = 0) then writeln('такого треугольника не существует') else begin if sqr(c) = sqr(a) + sqr(b) then writeln('прямоугольный'); if sqr(c) > sqr(a) + sqr(b) then writeln('тупоугольный'); if sqr(c) < sqr(a) + sqr(b) then writeln('остроугольный'); end; end.