MARTES:

  I)

1.- INICIO

2.-DECLARACION

INICIO, FINAL, W, G, M <- real

3.-ASIGNACION

INICIO<-2.5

FINAL<-10

M<-INICIO

G<-9.81

I<-INICIO

Para M<-INICIO hasta FINAL con paso 0.6 hacer

escribir"Fuerza es: ", W<- M*G;

Fin_Para

Fin

 

 II)

1.- INICIO

2.-DECLARACION

INICIO, FINAL, V, R, I <- real

3.-ASIGNACION

INICIO<-1

FINAL<-5

I<-Inicio

Leer (R);

Para I<-INICIO hasta FINAL con paso 0.1 hacer

V<- I*R

escribir "Con intensidad I", I, "Voltaje es: ", V;

Fin_para

Fin

 

 

JUEVES:

 

 I)

1.- INICIO

2.-DECLARACION

INICIAL, FINAL, C, A, Tc, Tf, L, C, H, INICIAL1, INICIAL2 <- real

3.-ASIGNACION

LEER (C, A, Tf)

INICIAL<-100

FINAL<-800

Tc<-INICIAL

INICIAL1<-5

FINAL1<-10

L<-INICIAL1

Leer (R);

Para Tc=INICIAL hasta Tc <=FINAL hacer Tc=Tc+10

Para I=NICIAL hasta L<=FINAL hacer L=L+0.1

H<-C*A*(Tc-Tf)/L

escribir "H es: ", H;

Fin_para

Fin_para

Fin

 

 II)

1.- INICIO

2.-DECLARACION

INICIO, FINAL, Pa, Pr, Pi <- real

3.-ASIGNACION

Leer (PI)

INICIAL<-5000

FINAL<-10000

Pa<-INICIAL

Para Pa=INICIAL hasta Pa <=FINAL hacer Pa=Pa+100

Pr<-rc(Pa-Pi)

escribir "Con Pa", Pa "Pr=", Pr;

Fin_para

Fin

 

 III)

1.- INICIO

2.-DECLARACION

INICIO, FINAL, Ts, Tso, Tf, Tc, N <- real

3.-ASIGNACION

Leer(Tc, N)

INICIAL<-4

FINAL<-30

Tso<-INICIAL

INICIAL2<-400

INICIAL2<-800

Tf<-INICIAL2

Para Tso<-INICIAL hasta Tso<=FINAL hacer Tso=Tso+2

Para Tf<-INICIAL hasta Tf<=FINAL hacer Tf=Tf+10

Ts<-Tso*(1-Tf/Tc)(1-Tf/Tc)

escribir "El valor de Ts es:", Ts;

Fin_para

Fin