Question

Hay que hacer esto en PSeint 75 puntos :)

Se hizo una encuesta y se obtuvo los siguientes datos: cédula, estado civil, número de hijos; de (X) encuestas se desea sacar los siguientes datos: promedio de hijos de los casados, el número de casados que no tienen hijos, promedio general de los hijos de los encuestados y el número de solteros.NOTA: Considere 1 si es soltero2 si es casado

Answer 1

Respuesta:

Explicación:

Proceso ENCUESTA

Definir a,b como caracter;

Definir soltero,casado,hijo,total,estado,casado_c,casado_s Como Entero;

Definir promedio,total_hijo como real;

total<-0;

soltero<-0;

casado<-0;

hijo<-0;

promedio<-0;

casado_c<-0;

casado_s<-0;

total_hijo<-0;

Escribir '          ENCUESTA';

Escribir sin saltar 'Entrevistar (s) si  o  (n) no: ';

leer a;

Mientras a='s' Hacer

 total<-total+1;

 Escribir Sin Saltar 'Estado civil  soltero (1) casado(2): ';

 leer estado;

 

 Si estado==1 Entonces

  soltero<-soltero+1;

 SiNo

  casado<-total-soltero;

  Escribir Sin Saltar 'tiene hijos si(s) no(n): ';

  leer b;

   

  Si b=='s' Entonces

   Escribir Sin Saltar'numero de hijos: ';

   leer hijo;

   total_hijo<-total_hijo+hijo;

   total_hijo<-total_hijo/total;

   promedio<-promedio+hijo;

   promedio<-promedio/casado;

   casado_c<-casado_c+1;

  SiNo

   casado_s<-casado_s+1;

  FinSi

   

 FinSi

 Escribir sin saltar 'Entrevistar si(s) no(n):';

 leer a;

FinMientras

 

Escribir'El total de solteros es de :',soltero;

   Escribir'El total de casado sin hijo es de :',casado_s;

Escribir'El total de casado con hijo es de : ',casado_c;

Escribir 'El promedo de casado con hijo es de: ',promedio;

Escribir 'El promedio total de los entrevistados con hijos:',total_hijo;

 

FinProceso