programa no visualG usando a linguagem portugol

[R_PITA 0]

bom galera eu preciso fazer um programa no visualG usando a linguagem portugol para um trabalho, só que estou tendo dificuldade!

 

Função: Escrever um algoritmo que leia o nome e o sexo de 20 pessoas e se for mulher, leia

também a idade. No final informe total de homens e de mulheres e a idade da mulher

mais velha.

algoritmo "semnome"

// Função :

// Autor :

// Data : 11/06/2013

// Seção de Declarações

var

nome, nomevelho, sexo: literal

idade, somaidadeF, i, idadevelho, M,F : inteiro

inicio

somaidadeF <- 0

idadevelho <- 0

para i de 1 ate 20 faca

leia (nome)

leia (sexo)

se (sexo = "F") entao

leia(idade)

se (idadevelho < idade) entao

idadevelho <- idade

nomevelho <- nome

fimse

senao

somaidadeF <- somaidadeF + 1

fimse

fimpara

m<- m+1

f<- f+1

escreva ("Total de Homens é de: ",m )

fimalgoritmo

se alguém puder dar uma ajudinha...

Obrigado á todos

[Eisenheim 67]

Olá amigos.

 

Veja se isso lhe atende:

 

algoritmo "semnome"

 

var

nome, nomevelho, sexo: literal

idade, somaidadeF, i, idadevelho, M,F : inteiro

inicio

somaidadeF <- 0

idadevelho <- 0

para i de 1 ate 20 faca

Escreva("Seu Nome: ")

leia (nome)

Escreva("Seu Sexo: ")

leia (sexo)

se (sexo = "F") entao

f <- f + 1

Escreva("Sua Idade: ")

leia(idade)

se (idadevelho < idade) entao

idadevelho <- idade

nomevelho <- nome

fimse

senao

m <- m + 1

fimse

fimpara

escreval ("Total de Homens é de..: ",m )

escreval ("Total de Mulheres é de: ",f )

escreval ("Idade da mulher mais velha: ",idadevelho )

 

fimalgoritmo

 

Até a próxima. :thumbsup: