lunes, 15 de junio de 2009

Ejercicio



Proceso Ejercicios




Dimension a[4], b[4], c[8];


para i<-1 Hasta 4 Hacer
a[i]<-azar(1000); Escribir "A: ", a[i];
FinPara
Leer pausa;


para k<-1 Hasta 4 Hacer
b[k]<-azar(1000); Escribir "B: ", b[k];
FinPara
Leer pausa;

para z<-1 Hasta 4 hacer
c[z]<-a[z]; Escribir "C: ", c[z];
FinPara

Para yy<-5 Hasta 8 Hacer
c[yy]<-b[yy-4]; Escribir "C: ", c[yy];
FinPara


FinProceso

No hay comentarios:

Datos personales