Mely függvény adja meg hogy egy érték melyik szögnek a sin/cos/tg/ctg értéke?

'Igazából egy derékszögű háromszög befogóit szeretném kiszámolni úgy hogy csak az átfogó hossza és a befogók aránya ismert,'

Pascal szösszenet:

var b, c, arany : real;

begin

c := 5;

arany := 3/4;

b := c / Sqrt(Sqr(arany)+1);

WriteLn('c:= ',c:5:5);

WriteLn('b:= ',b:5:5);

WriteLn('a:= ',b * arany:5:5);

ReadLn;

end.

mivel derékszögű háromszögről beszélünk így Pitagorasz tétel.

Tovább szögekre is:

program Project2;

{$APPTYPE CONSOLE}

uses

SysUtils, Math;

var a, b, c, arany, alpha, beta: real;

begin

c := 5;

arany := 3/4;

b := c / sqrt(sqr(arany)+1);

a := b * arany;

alpha := (ArcSin(a/c) * 180 / Pi);

beta := (ArcSin(b/c) * 180 / Pi);

WriteLn('c:= ',c:5:5);

WriteLn('b:= ',b:5:5);

WriteLn('a:= ',a:5:5);

WriteLn('alpha:= ', alpha:5:5);

WriteLn('beta:= ', beta:5:5);

ReadLn;

end.