Visualg função/subrotina

[marialuiza 0]

A prefeitura de uma cidade fez uma pesquisa entre os seus habitantes, coletando dados sobre o salário e número de filhos. Faça uma função que leia esses dados para um número não determinado de pessoas e retorne a média do salário da população, a média do número de filhos, o maior salário e o percentual de pessoas com salário até 350 reais.

O final do algoritmo tá dando erro, como faço para mudá-lo?

Var

// Seção de Declarações das variáveis

f: inteiro

oi,s: real

x, opcao: caracter

funcao prefeitura (var a,b: real): real

var

ms, mf, maiors, ps, contfilhos, contsalario, somasalario, contsalario350: real

inicio

contfilhos <- 0

contsalario <- 0

somasalario <-0

contsalario350 <- 0

maiors <- 0

enquanto s>=0 faca

se s>maiors entao

maiors <- s

fimse

somasalario <- somasalario + s

contsalario <- contsalario + 1

se s <= 350 entao

contsalario350 <- contsalario350 + 1

fimse

contfilhos <- contfilhos + f

fimenquanto

mf <- contfilhos/contsalario

ms <- somasalario/contsalario

ps <- (contsalario350/contsalario)*100

retorne maiors

retorne mf

retorne ms

retorne ps

fimfuncao

Inicio

// Seção de Comandos, procedimento, funções, operadores, etc...

x <- "s"

enquanto x="s" faca

escreva ("Digite seu salário: ")

leia (s)

escreva ("Quantos filhos você tem? ")

leia (f)

escreva ("Digite SIM para ccadastrar e NÃO para sair")

leia(opcao)

se (opcao="não") entao

interrompa

senao

se (opcao="sim") entao

oi <- prefeitura(s,f)

fimse

fimse

fimenquanto

oi <- prefeitura(s,f)

oi

Fimalgoritmo

[KhaosDoctor 242]

Que erro que está dando?

[gabrielfalieri 15]

1 - Indique qual erro está acontecendo
2 - Coloque variáveis que são auto-explicativas, conforme as boas práticas, esse "oi" por exemplo