Algoritímo

TRABALHO DE ALGORITMO

1 - Ler um número inteiro e imprimir seu sucessor e seu antecessor

Algoritmo SucessorAntecessor

Declare X, sucessor, antecessor inteiro;

Início escreva “Digite um numero:”; leia X; sucessor X + 1; antecessor X – 1; escreva “Seu sucessor e:“, sucessor; escreva “Seu antecessor e:“, antecessor;
Fim

2 - Informar três números inteiros e imprimir a média

Algoritmo Media

Declare X1, X2, X3, media inteiro;

Início escreva “Digite o primeiro numero:”; leia X1; escreva “Digite o segundo numero:“; leia X2; escreva “Digite o terceiro numero:“; leia X3; media (X1 + X2 + X3) / 3; escreva “ A media e: “, media;
Fim

3 - Entrar com um nome e imprimir o nome somente se a primeira letra do nome for “a” (maiúscula ou minúscula)

Algoritmo ImprimirNome

Declare nome: vetor[30] caracter;

Início escreva “Informe um nome:”; leia nome; se (nome[0] = “A” ou “a”) então imprime nome fim se
Fim
4 - Receber do teclado uma mensagem e imprimir quantas letras A, E, I, O, U tem esta mensagem. Considerar minúscula e maiúscula.
Nota: para saber quantas letras existem em um caracter, utiliza-se a função strlen( caractere ).

Algoritmo ImprimirQtdLetras

Declare mensagem: vetor[60] caracter;

Declare contador, letras_A, letras_E, letras_I, letras_O, letras_U inteiro

Início escreva “Digite uma mensagem com ate 60 caracteres:”; leia mensagem; contador 0; PARA contador de 1 ate 60 faça se mensagem[0] “A” ou mensagem[0] = “a” então Letras_Aletras_A + 1; Senão se mensagem[0] = “E” ou mensagem[0] = “e”então Letras_Eletras_E + 1; Senão se mensagem[0] = “I” ou mensagem[0] = “i”então Letras_Iletras_I + 1; Senão se mensagem[0] = “O” ou mensagem[0] = “o”então Letras_Oletras_O + 1; Senão se mensagem[0]