PRACTICA 4

problema 1

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

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