Trabalho De Informatica 3
1. Faça um programa que lê do usuário um caractere e informa se o caractere lido é um algarismo.
VAR: C
CARACTER
INÍCIO
ESCREVA (“DIGITE C”)
LER C
SE (C >= 0 E C <= 9)
ESCREVA(“C É UM ALGARISMO”)
SENAO
ESCREVA (“C NÃO É UM ALGARISMO”)
FIM SE
FIM
2. Faça um programa para ler 3 números reais do teclado e verificar se o primeiro é maior que a soma dos outros dois.
VAR: N1, N2, N3;
REAL
INÍCIO
ESCREVA N1
LER N1,
ESCREVA N2
LER N2
ESCREVA N3
LER N3
SE (“N1 > N2+N3”)
ESCREVA (“N1 É MAIOR”)
SENAO
ESCREVA (“N1 NÃO É MAIOR”)
FIM SE
FIM SE
SIM
3. Faça um programa que leia 5 números e informe quantos desses números são maiores que 10
VAR: N1, N2, N3, N4, N5, MAIORES
REAL, CARACTER
INÍCIO
ESCREVA (“DIGITE N1”)
LER N1
ESCREVA (“DIGITE N2”)
LER N2
ESCREVA (“DIGITE N3”)
LER N3
ESCREVA (“DIGITE N4”)
LER N4
ESCREVA (“DIGITE N5”)
LER N5
MAIORES=0
SE (N1 > 10)
ESCREVA(MAIORES = MAIORES +1)
SE (N2 > 10)
ESCREVA(MAIORES = MAIORES +1)
SE (N3 > 10)
ESCREVA(MAIORES = MAIORES +1)
SE (N4 > 10)
ESCREVA(MAIORES = MAIORES +1)
SE (N5 > 10)
ESCREVA(MAIORES = MAIORES +1)
ESCREVA (“MAIORES”)
FIM SE
FIM SE
FIM SE
FIM SE
FIM SE
FIM
4. Faça um programa para ler 3 números reais do teclado e verificar se o maior deles é maior que a soma dos outros dois
VAR. N1, N2, N3
REAL
INÍCIO
ESCREVA (“DIGITE N1”)
LER N1
ESCREVA (“DIGITE N2”)
LER N2
ESCREVA (“DIGITE N3”)
LER N3
SE N1>N2+N3 OU N2>N1+N3 OU N3>N1+N2
ESCREVA (“É MAIOR”)
SE NÃO
ESCREVA (“NÃO É MAIOR”)
FIM SE
FIM SE
FIM
5. LER UM NOME DO TECLADO E VER SE É IGUAL AO SEU NOME. IMPRIMIR CONFORME O CASO: “NOME CORRETO” OU “NOME INCORRETO”..
VAR. NOME,
CARACTER
INICIO
ESCREVA (‘DIGITE NOME’);
LEIA NOME;
SE (NOME = WENDERSON)
ESCREVA (“SENHA CORRETA”)
SENÃO
ESCREVA (‘SENHA INCORRETA’);
FIM SE
FIM
6. Ler três números diferentes e mostrá-los em ordem crescente. Idem para ordem descendente.
VAR. N1, N2, N3, MENOR, MAIOR MEIO;
REAL
INÍCIO
ESCREVA (“DIGITE N1”)
LER N1
ESCREVA (“DIGITE N2”)
LER N2
ESCREVA (“DIGITE N3”)
LER