Algoritmos Portugol

1) Faça um programa que receba o valor de um depósito e o valor da taxa de juros, calcule e mostre o valor do rendimento e o valor total depois do rendimento.

ALGORITMO DEPOSITO

INÍCIO

REAL DEPOS, TAXA, REND, REND_FINAL;

ESCREVA(“INFORME O VALOR DO DEPÓSITO: ”);

LEIA (DEPOS);

ESCREVA (“INFORME O VALOR DAS TAXAS DE JUROS: ”);

LEA (TAXA);

REND = DEPOS*(TAXA/100);

ESCREVA (“O VALOR DO RENDIMENTO É: ”,REND);

REND_FINAL = DEPOSITO + REND;

ESCREVA (“O VALOR DO RENDIMENTO FINAL É: ”,REND_FINAL);

FIM.

2) Faça um programa que receba dois números maiores que zero, calcule e mostre um elevado ao outro.

ALGORITMO NUMERO_ELEVADO

INT NUM1,NUM2, RESULTADO

INICIO

ESCREVA ("DIGITE ABAIXO DOIS NÚMEROS MAIORES QUE ZERO!") ;

ESCREVA ("NÚMERO1: ") ;

LEIA (NUM1) ;

ESCREVA ("NÚMERO2: ") ;

LEIA (NUM2) ;

RESULTADO = NUM1^NUM2 ;

ESCREVA ("O RESULTADO ENTRE OS DOIS NÚMEROS É: ",RESULTADO) ;

FIM.

3) Pedro comprou um saco de ração com peso em quilos. Ele possui dois gatos, para os quais fornece a quantidade a quantidade de ração em gramas. A quantidade diária de ração fornecida para cada gato é sempre a mesma. Faça um programa que receba o peso do saco de ração fornecida para cada gato, calcule e mostre quanto restará de ração no saco após cinco dias.

PROGRAMA CACHORROS

REAL SACO_RACAO, RAC_GRAMAS, QUANT_RAC, QUANT_DOIS_GATOS, SOBRA_RAC , RESTO;

INÍCIO

ESCREVA (“DIGITE O PESO DO SACO DE RAÇÃO EM QUILOS: ”);

LEIA (SACO_RACAO);

RAC_GRAMAS = SACO_RACAO * 1000;

ESCREVA (“DIGITE A QUANTIDADE DE RAÇÃO PARA CADA GATA EM GRAMAS: ”);

LEIA (QUANT_RAC);

QUANT_DOIS_GATOS = (QUANT_RAC * 2)*5;

SOBRA_RAC = RAC_GRAMAS – QUANT_DOIS_GATOS;

RESTO = SOBRA_RAC/1000;

ESCREVA (“DEPOIS DE ALIMENTAR OS DOIS GATOS COM A MESMA QUANTIDADE DE RAÇÃO, SOBROU ”, RESTO ,” QUILOS DE RAÇÃO.”);

FIM.