s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
Psudocodigo
s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
PROBLEMA 2
Psudocodigo
s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
PROBLEMA3
Psudocodigo
s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
PROBLEMA4
PROBLEMA 5
PROBLEMA 6

Psudocodigo
s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
PROBLEMA7
PROBLEMA 8
PROBLEMA 9
Psudocodigo
s, c, t, ct, sc ,a real
char ta
write "Valor del angulo : "
read a
write"Oprima g si el angulo esta en grados o r si es en radianes : "
read ta
if(ta=g or ta=G)
s=sin((a*3.1416) /180.0)
c=cos((a*3.1416) /180)
t=(sin((a*3.1416) /180))/(cos((a*3.1416) /180))
ct= 1.0/((sin((a*3.1416) /180.0))/(cos((a*3.1416) /180.0)) )
sc=1.0 /((a*3.1416) /180.0)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
if(ta=r or ta=R)
s=sin(a) c=cos(a) ;
t=(s)/(c)
ct= 1./((sin(a)))/(cos(a))
sc=1 /(a)
write " seno: ",s
write"coseno: ",c
write ” tangente: ",t
write” Cotangente: “,ct
write ”secante: ",sc
PROBLEMA 10







.png)
















