Utilizar estructura REPETIR. De una encuesta de 25 alumnos se tomaron por teclado los siguientes datos: edad, sexo (“V” o “M”) y si es soltero/a (“SI” o “NO”). Se pide informar: a) Cuántos varones de 21 años o más. b) Cuántas mujeres solteras. c) Promedio de edad de los hombres NO solteros.

Algoritmo _25alumnosencuesta_By_RichardLG

Definir edad,n,x,v21,ms,sns,cn Como Entero;

Definir sexo,resp Como Caracter;

Definir pns Como Real;

n<-2;

x<-0;

v21<-0;

ms<-0;

Repetir

Escribir Sin Saltar "Ingrese edad : ";

Leer edad;

Repetir

Escribir Sin Saltar "Ingrese sexo (V/M) : ";

leer sexo;

sexo<-Mayusculas(sexo);

Hasta Que sexo=="V" o sexo=="M";

Repetir

Escribir Sin Saltar "Es soltero/a (SI/NO) : ";

leer resp;

resp<-Mayusculas(resp);

Hasta Que resp=="SI" o resp=="NO";

Escribir "";

Si sexo=="V" Entonces

Si resp=="NO" Entonces

sns<-sns+edad;

cn<-cn+1;

FinSi

Si edad>=21 Entonces

v21<-v21+1;

FinSi

SiNo

Si resp=="SI" Entonces

ms<-ms+1;

FinSi

FinSi

x=x+1;

Hasta Que x==n;

Si cn==0 Entonces

pns<-0;

SiNo

pns<-sns/cn;

FinSi

Escribir "a) Cuántos varones de 21 años o más : ",v21;

Escribir "b) Cuántas mujeres solteras : ",ms;

Escribir "c) Promedio de edad de los hombres NO solteros: ",pns;

FinAlgoritmo