Trabalho De Programa O

TRABALHO

PROGRAMAÇÃO DE COMPUTADORES

ALGORITMOS

IDENTIFICAÇÃO

UNIVERSIDADE PAULISTA-UNIP
BLOCO D SALA 02

1-algoritmo "Par ou Ímpar" var n: inteiro inicio escreval("Insira um número inteiro: ") leia(n) se(n mod 2 = 0) entao escreval("O número: ",n," é par") senao escreval("O número: ",n," é impar") fimse fimalgoritmo

2- algoritmo "Faixa Permitida" var n :real inicio escreval("Digite um valor: ") leia(n) se(n >= 1) e (n <= 9) entao escreval("O valor está na faixa permitida") senao escreval("O valor não está na faixa permitida") fimse fimalgoritmo

3- algoritmo "Sexo da pessoa" var nome, sexo :literal inicio escreval("Digite o seu nome: ") leia(nome) escreval("Digite o seu sexo: ") leia(sexo) se(sexo = "Masculino") entao escreval("Ilmo Sr. ",nome) senao se(sexo = "Feminino") entao escreval("Ilmo Sra. ",nome) senao escreval("Digite um sexo válido") fimse fimse fimalgoritmo 4- algoritmo "Armazenamento" var n,a,b :real inicio escreval("Digite um número: ") leia(n) se(n >= 0) entao a<- n escreval("O número :",a," é variável de A") senao b <- n escreval("O número :",b," é variável de B") fimse fimalgoritmo

5- algoritmo "Peso Ideal" var a, p :real s :literal inicio escreval("Digite o seu sexo F ou M: ") leia(s) escreval("Digite a sua altura: ") leia(a) se(s = "F") entao p <- (62.1 * a) - 44.7 escreval("Seu peso ideal é: ",p) senao se(s = "M") entao p <- (72.7 * a) - 58 escreval("Seu peso ideal é: ",p) senao escreval("Digite um sexo válido") fimse fimse fimalgoritmo 6- algoritmo "Situação com média" var n1, n2, n3, n4, media :real inicio escreval("Digite a 1ª nota :") leia(n1) escreval("Digite a 2ª nota :") leia(n2) escreval("Digite a 3ª nota :") leia(n3) escreval("Digite a 4ª nota :") leia(n4) media<- (n1 + n2 + n3 + n4) / 4 se(media >= 5) entao escreval("O aluno foi aprovado com média: ",media) senao escreval("O aluno não foi aprovado com média: ",media) fimse fimalgoritmo

7- algoritmo "Situação do Aluno" var n1,