Algoritmo
Resenha: Algoritmo. Pesquise 861.000+ trabalhos acadêmicosPor: JuhcostaaR • 6/10/2013 • Resenha • 1.209 Palavras (5 Páginas) • 286 Visualizações
1. Elabore um algoritmo que calcule a área de um círculo qualquer de raio fornecido.
Início
real: raio, pi, area;
pi=3.14;
escreva("Informe o raio:");
leia (raio);
area = pi * (raio*raio);
escreva("A area do circulo e: \t %.2f",area);
Fim
2. Prepare um algoritmo capaz de inverter um número de 3 dígitos, isto é, apresentar primeiro
a unidade, depois a dezena, depois a centena.
Inicio
inteiro: num,cent,dez,uni;
Escreva (“Digite três números seguidos”);
Leia (num);
uni=num mod10;
Dez=Num div 100;
Cent =(num div10)-((num div 100) *10);
Escreva (“unidade”, uni);
Escreva (“Dezena”, dez);
Escreva (“Centena”, cent);
Fim
3. Dada uma determinada data de aniversário (dia, mês e ano separadamente), elabore um
algoritmo que solicite a data atual (também separadamente) e calcule a idade em anos,
meses e dias.
Início
inteiro: dia_atual,mes_atual,ano_atual,niv_dia,niv_mes,niv_ano,idade_mes,idade_anos,idade_dia
escreva("Informe a data atual (dia/mes/ano)");
leia(dia_atual,mes_atual,ano_atual);
escreva("Informe a data de nascimento(dia/mes/ano)");
scanf(niv_dia,niv_mes,niv_ano);
idade_anos = (ano_atual - niv_ano);
printf("idade/ano atual:",idade_anos);
idade_mes = (ano_atual * 12);
printf("idade/mes atual:",idade_mes);
idade_dia = (ano_atual * 365);
printf("idade/dia atual:",idade_dia);
Fim
4. Um dado comerciante maluco cobra 10% de acréscimo para cada prestação em atraso e
depois dá um desconto de 10% sobre esse valor. Faça um algoritmo que solicite o valor da
prestação em atraso e apresente o valor final a pagar, assim como o prejuízo do comerciante
na operação.
Início
real prestação, total, novo_total;
escreva("Digite o valor da prestação:");
leia(prestação);
total = prestação+(prestação*10/100);
novo_total = total-(total*10/100);
Escreva("Valor total a pagar é:",novo_total);
Fim
5. Escreva um algoritmo que a partir de um mês fornecido (inteiro de 1 a 12), apresente o
nome dele por extenso ou uma mensagem de mês invalido.
inteiro: mes;
escreva("Informe o mes (1/12)");
leia (mes);
se (mes==1) então
escreva("Janeiro");
se (mes==2) então
escreva("fevereiro");
se (mes==3) então
escreva("março");
se (mes==4) então
escreva("abril");
se (mes==5) então
escreva("maio");
se (mes==6) então
escreva("junho\n");
se (mes==7) então
escreva("julho\n");
se (mes==8) então
escreva("agosto");
se (mes==9) então
escreva("setembro");
se (mes==10) então
escreva"outubro");
se (mes==11) então
escreva("novembro");
se (mes==12) então
escreva("dezembro");
senão
escreva("numero invalido!!! Tente novamente ");
...