TrabalhosGratuitos.com - Trabalhos, Monografias, Artigos, Exames, Resumos de livros, Dissertações
Pesquisar

Técnico Eletronico

Exam: Técnico Eletronico. Pesquise 860.000+ trabalhos acadêmicos

Por:   •  28/8/2014  •  Exam  •  541 Palavras (3 Páginas)  •  172 Visualizações

Página 1 de 3

5)

algoritmo "ex5"

var

s, i, x: inteiro

m: real

inicio

s<-0

i<-0

escreval ("Digite um numero inteiro ou zero para sair")

leia (x)

enquanto (x<>0) faca

se (x<0) entao

escreval ("O numero digitado não é positivo, por favor entre com outro número")

leia (x)

fimse

s<-s+x

i<-i+1

escreval ("Digite um numero inteiro positivo: ")

leia (x)

fimenquanto

se (i>=1) entao

m<-s/i

escreval ("A media calculada foi ", m)

senao

escreval ("Nenhum valor positivo foi digitado!")

fimse

fimalgoritmo

6)

algoritmo "ex6"

var

x, spar, q, qpar, qimpar: inteiro

mimpar : real

inicio

qpar := 0

qimpar := 0

para q de 1 ate 10 faca

escreva("informe o ", q, "º numero: ")

leia(x)

se(x mod 2 = 0) entao

qpar := qpar + 1

spar := spar + x

senao

qimpar := qimpar + 1

mimpar := mimpar + x

fimse

fimpara

escreval("Pares: ", qpar)

escreval("Impares: ", qimpar)

escreval("Somas Pares: ", spar)

escreval("Media Impares: ", mimpar/qimpar)

fimalgoritmo

7)

algoritmo "ex7"

var

dias: inteiro

horas, totalhoras, sal : real

inicio

totalhoras <- 0

dias <- 0

para dias de 1 ate 30 faca

escreva("informe as horas trabalhadas no ", dias, "º dia: ")

leia(horas)

totalhoras<-totalhoras + horas

fimpara

sal<-totalhoras*10

escreval("Salário: ", sal, ",00 R$")

fimalgoritmo

8)

algoritmo "ex8"

var

altura, maior_altura, menor_altura:real

media_alt_mulheres, media_alt_populacao:real

sexo:caractere

contador, qtd_mulheres, populacao:inteiro

inicio

populacao <- 10

escreva("Entre com a altura da pessoa 1: ")

leia(altura)

escreva("Entre com o sexo da pessoa 1: ")

leia(sexo)

maior_altura <- altura

menor_altura <- altura

// Para calcular a média da altura das mulheres

se sexo = "f" entao

qtd_mulheres <- qtd_mulheres + 1

media_alt_mulheres <- media_alt_mulheres + altura

fimse

media_alt_populacao <- media_alt_populacao + altura

para contador de 2 ate populacao faca

escreval("-----")

escreva("Entre com a altura da pessoa ",contador," : ")

leia(altura)

escreva("Entre com o sexo da pessoa ",contador," : ")

leia(sexo)

// Para

...

Baixar como (para membros premium)  txt (3.8 Kb)  
Continuar por mais 2 páginas »
Disponível apenas no TrabalhosGratuitos.com