Переведите числа 78 в12 в десятичную систему счисления. распишите !

Question

Информатика: Переведите числа 78 в12 в десятичную систему счисления. распишите !

даша3335 · Accepted Answer

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018 // Внимание! Если программа не работает, обновите версию! begin   var (a,b,c):=ReadReal3( Введите стороны треугольника: );   if (a+b c) and (a+c b) and (b+c a) then begin     var alpha:=ArcCos((b*b+c*c-a*a)/(2*b*c));     var beta:=ArcCos((a*a+c*c-b*b)/(2*a*c));     var gamma:=Pi-alpha-beta;     var max:=Max(Max(alpha,beta),gamma);     var d:=max-Pi/2;     if abs(d) =1e-12 then Writeln( Треугольник прямоугольный )     else if d 0 then Writeln( Треугольник...

MOGZ ответил