Algiritmo

6) Escreva um algoritmo que, a partir do mês fornecido (de 1 a 12), apresente o nome

dele por extenso ou uma mensagem de mês inválido.

Inicio

Inteiro: mes;

Leia(mes);

escolha (mes)

caso 1: Escreva("Janeiro");

caso 2: Escreva("Fevereiro");

caso 3: Escreva("Março");

caso 4: Escreva("Abril");

caso 5: Escreva("Maio");

caso 6: Escreva("Junho");

caso 7: Escreva("Julho");

caso 8: Escreva("Agosto");

caso 9: Escreva("Setembro");

caso 10: Escreva("Outubro");

caso 11: Escreva("Novembro");

caso 12: Escreva("Dezembro");

caso contrário: Escreva("Inválido");

fimescolha;

Fim.7) A conversão de graus Fahrenheit para centígrados é obtida pela fórmula C = 5/9 (F -

32). Escreva um algoritmo que calcule e escreva uma tabela de graus centígrados em

função de Fahrenheit que variem de 50 a 150 de 1 em 1 grau.

Inicio

Real: C;

Inteiro: F;

F <-- 50;

repita

C <-- 5 / 9 (F - 32);

F <-- F + 1;

Escreva(C);

até (F <= 150);

Fim.

8) Prepare um algoritmo que calcule o valor de H, sendo que ele é determinado pela

série: H = 1/1 + 3/2 + 5/3 + 7/4 + ... + 99/50.

Inicio

Inteiro: A, B;

Real: H;

A <-- 1;

B <-- 1;

H <-- 0;

repita

H <-- H + A / B;

A <-- A + 1;

B <-- B + 2;

até (A <= 50);

Escreva(H);

Fim.

9) Elabore um algoritmo que determine o valor de S, em que: S = 1/1 - 2/4 + 3/9 - 4/16 +

5/25 – 6/36 ... – 100/100.

Inicio

Inteiro: A, B;

Real: S;

A <-- 1;

B