Pratique os exercícios seguintes com o editor: Portugol Webstudio!
Exercícios aritméticos
Comparação de números
- Faça um algoritmo para ler dois números e imprimir a soma dos números lidos.
- Faça um algoritmo para ler três números e imprimir a soma, média e produto dos números lidos.
- Faça um algoritmo para ler dois números e imprimir o maior, o menor ou então dizer se são iguais.
- Faça um algoritmo para ler um número inteiro e dizer se o número lido é par ou impar.
- Faça um algoritmo para ler dois números A e B e dizer se A é divisível por B.
- Faça um algoritmo para ler dois números e imprimi-los em ordem crescente.
- Faça um algoritmo para ler três números e imprimir o maior.
- Faça um algoritmo para ler três números e imprimir se estes podem ou não formar um triângulo.
Observação – Para formar os lados de um triângulo cada um dos valores tem que ser menor que a soma dos outros dois. - Faça um algoritmo para ler três números e se estes poderem formar um triângulo dizer se o triângulo é “EQUILÁTERO”, “ISÓSCELES” OU “ESCALENO”.
- Faça um algoritmo para ler o preço de compra de uma mercadoria e calcular o seu preço de venda para que possa ser obtido um lucro de 30%.
- Faça um algoritmo para ler os catetos de um triângulo retângulo e calcular e imprimir a sua hipotenusa.
- Faça um algoritmo para ler o raio e calcular o comprimento, a área e o volume de uma esfera.
| DADOS: | |
|---|---|
| Comprimento : | |
| Área : | |
| Volume: |
Resolução 1:
programa calculodaesfera;
constante
pi <- 3,1416
variável
raio: real;
Inicio
leia ( raio );
escreva(‘O comprimento da esfera é ‘, 2 * pi * raio);
escreva(‘A área da esfera é ‘, pi * raio ** 2 );
escreva(‘O volume da esfera é ‘, ( 3 * ( pi * raio ** 3 ) ) / 4);
fimResolução 2:
programa calculodaesfera;
constante
pi <- 3,1416
variável
raio, comp, area, vol : real;
Inicio
escreva(‘Favor digitar o raio da esfera’);
leia ( raio );
comp <- 2 * pi * raio;
area <- pi * raio ** 2;
vol <- 3 * ( pi * raio ** 3 ) ) / 4;
escreva(‘O comprimento da esfera é ‘, comp );
escreva(‘A área da esfera é ‘, area );
escreva(‘O volume da esfera é ‘, vol );
fim.Média
- Faça um algoritmo que leia as três notas, as faltas e o nome de um aluno e imprima sua situação. ( “APROVADO”, “REPROVADO POR FALTA” ou “REPROVADO POR MÉDIA” )
Observação – A média para aprovação é 5.0 e o limite de faltas é 17. - Construa um algoritmo que calcule a média aritmética entre quatro notas quaisquer fornecidas pelo usuário.
Resolução Nº1:
Programa média;
variaveis
N1, N2, N3, N4: real;
inicio
leia ( N1, N2, N3, N4 );
escreva ( ( N1 + N2 + N3 + N4 ) / 4 );
fimResolução Nº2:
Programa média;
variaveis
N1, N2, N3, N4, MEDIA: real;
Inicio
leia ( N1, N2, N3, N4 );
MEDIA <- ( N1 + N2 + N3 + N4 ) / 4;
Escreva ( MEDIA );
fimResolução Nº3:
Programa média;
variaveis
N1, N2, N3, N4, MEDIA: real;
inicio
leia ( N1, N2, N3, N4 );
MEDIA <- ( N1 + N2 + N3 + N4 ) / 4;
Escreva ( “A media aritmética do aluno nas quatro notas tiradas é “, MEDIA );
fimMédia das médias
Faça um algoritmo para ler nove número inteiros quaisquer. Tirar a média aritmética dos três primeiros, depois a média dos outros três e por fim a média dos três últimos. Escreva as três médias e a média das três médias.
Resolução Nº1:
programa médiadasmédias;
variáveis
N1, N2, N3, N4, N5, N6, N7, N8, N9: inteiro;
Inicio
leia ( N1, N2, N3, N4, N5, N6, N7, N8, N9 );
escreva(“A media dos primeiro três números é “, ( N1 + N2 + N3 ) / 3);
escreva(“A media dos outros três números é , ( N4 + N5 + N6 ) / 3);
escreva(“A media dos últimos três números é “, ( N7 + N8 + N9 ) / 3);
escreva(“Media das medias “,((N1 + N2 + N3) / 3 + (N4 + N5 + N6) / 3 + (N7 + N8 + N9) / 3) / 3);
fimResolução Nº2:
programa médiadasmédias;
variáveis
N1, N2, N3, N4, N5, N6, N7, N8, N9: inteiro;
MEDIA1, MEDIA2, MEDIA3: real;
inicio
leia ( N1, N2, N3, N4, N5, N6, N7, N8, N9 );
MEDIA1 <- ( N1 + N2 + N3 ) / 3;
MEDIA2 <- ( N4 + N5 + N6 ) / 3;
MEDIA3 <- ( N7 + N8 + N9 ) / 3;
escreva(“A media dos primeiro três números é “, MEDIA1);
escreva(“A media dos outros três números é “, MEDIA2;
escreva(“A media dos últimos três números é “, MEDIA3);
escreva(“A media das medias é “,(MEDIA1 + MEDIA2 + MEDIA3) / 3);
fimResolução Nº3:
programa médiadasmédias;
variáveis
N1, N2, N3, N4, N5, N6, N7, N8, N9: inteiro;
MEDIA1, MEDIA2, MEDIA3, MMEDIA: real;
inicio
leia ( N1, N2, N3, N4, N5, N6, N7, N8, N9 );
MEDIA1 <- ( N1 + N2 + N3 ) / 3;
MEDIA2 <- ( N4 + N5 + N6 ) / 3;
MEDIA3 <- ( N7 + N8 + N9 ) / 3;
MMEDIA <- ( MEDIA1 + MEDIA2 + MEDIA3 ) / 3;
escreva(“A media dos primeiro três números e “, MEDIA1);
escreva(“A media dos outros três números e “, MEDIA2);
escreva(“A media dos últimos três números e “, MEDIA3);
escreva(“A media das medias e “,MMEDIA);
fimPeso ideal
Faça um algoritmo para calcular o peso ideal de uma pessoa sabendo sua altura.
DADO:
- para homens ( 72,7 * altura ) – 58;
- para mulheres ( 62,1 * altura ) – 44,7.
Resolução Nº1:
programa pesoideal;
variável
ALT: real;
inicio
leia ( ALT );
escreva(“Se a altura lida for de um homem seu peso ideal será de “, ( 72,7 * ALT ) – 58 ),“Kg);
escreva(“Se a altura lida for de uma mulher seu peso ideal será de“,(62,1 * ALT) – 44,7), “Kg”);
fimResolução Nº2:
programa pesoideal;
variáveis
ALT, ALTH, ALTM: real;
Inicio
leia ( ALT );
ALTH <- ( 72,7 * ALT ) – 58;
ALTM <- ( 62,1 * ALT ) – 44,7;
escreva(“Se a altura lida for de um homem seu peso ideal será de “, ALTH, “Kg”);
escreva(“Se a altura lida for de uma mulher seu peso ideal será de “, ALTM, “Kg”);
fimManipulando textos
Faça um algoritmo para ler duas variáveis caractere e concatená-las em uma terceira.
programa concatenar;
variável
palavra1, palavra2, conca : caracter ;
Inicio
escreva(‘Favor digitar as duas palavras’);
leia ( palavra1, palavra2 );
conca <- palavra1 + palavra2 ;
escreva(‘As duas palavras são’, palavra1 , ‘ e ‘, palavra2 );
escreva(‘A concatenação das duas palavras é’ , conca );
fim.Faça um algoritmo para ler duas variáveis inteiras e trocar o conteúdo lido de uma pela outra.
programa trocanumero;
variável
n1, n2, aux : inteiro ;
Inicio
escreva(‘Favor digitar os dois numeros’);
leia ( n1, n2 );
aux <- n2 ;
n2 <- n1 ;
n1 <- aux;
fim.