Algoritmos

12) Tendo como entrada a altura e o sexo (codificado da seguinte forma: 1:feminino 2:masculino) de

uma pessoa, construa um programa que calcule e imprima seu peso ideal, utilizando as seguintes

fórmulas:

- para homens : (72.7 * h) – 58

- para mulheres : (62.1 * h) – 44.7

Observação: Altura = h (na fórmula acima).

13) Escreva um programa para ler um número inteiro (considere que serão lidos apenas valores

positivos e inteiros) e escrever se é par ou ímpar.

14) Escreva um programa para ler o número de gols marcados pelo Grêmio e o número de gols

marcados pelo Inter em um GRENAL. Escrever o nome do vencedor. Caso não haja vencedor

deverá ser impressa a palavra EMPATE.

15) Escreva um programa para ler o número de lados de um polígono regular e a medida do lado (em

cm). Calcular e imprimir o seguinte:

- Se o número de lados for igual a 3 escrever TRIÂNGULO e o valor do seu perímetro.

- Se o número de lados for igual a 4 escrever QUADRADO e o valor da sua área.

- Se o número de lados for igual a 5 escrever PENTÁGONO.

Observação: Considere que o usuário só informará os valores 3, 4 ou 5.

Exercícios de Programação I - Linguagem Pascal

Profa. Flávia Pereira de Carvalho - [e-mail] - http://fit.faccat.br/~fpereira 6

16) Acrescente as seguintes mensagens à solução do exercício anterior conforme o caso.

- Caso o número de lados seja inferior a 3 escrever NÃO E’ UM POLÍGONO.

- Caso o número de lados seja superior a 5 escrever POLÍGONO NÃO IDENTIFICADO.

Observação: Considere que o usuário poderá informar qualquer valor para o número de lados.

17) Escreva um programa para ler 2 valores inteiros e uma das seguintes operações a serem

executadas (codificada da seguinte forma: 1.Adição, 2.Subtração, 3.Divisão, 4.Multiplicação).

Calcular e escrever o resultado dessa operação sobre os dois valores lidos. Observação: Considere

que só serão lidos os valores 1, 2, 3 ou 4.

18) Escreva um programa para ler 3 valores inteiros e escrever o maior deles. Considere que o usuário

não informará valores iguais.

19) Escreva um programa para ler 3 valores e escrever a soma dos 2 maiores. Considere que o usuário

não informará valores iguais.

20) Escreva um programa para ler 3 valores e escrevê-los em ordem decrescente. Considere que o

usuário não informará valores iguais.

21) Escreva um programa que leia as medidas dos lados de um triângulo e escreva se ele é

Equilátero, Isósceles ou Escaleno. Sendo que:

- Triângulo Equilátero: possui os 3 lados iguais.

- Triângulo Isósceles: possui 2 lados iguais.

- Triângulo Escaleno: possui 3 lados diferentes.

22) Escreva um programa que leia a idade de 2 homens e 2 mulheres (considere que a idade dos

homens será sempre diferente, assim como das mulheres). Calcule e escreva a soma das idades do

homem mais velho com a mulher mais nova, e o produto das idades do homem mais novo com a

mulher mais velha.

23) Escreva um programa que leia o valor de 3 ângulos de um triângulo e escreva se o triângulo é

Acutângulo, Retângulo ou Obtusângulo. Sendo que:

- Triângulo Retângulo: possui um ângulo reto. (igual a 90º)

- Triângulo Obtusângulo: possui um ângulo obtuso. (maior que 90º)

- Triângulo Acutângulo: possui três ângulos agudos. (menor que 90º)

Exercícios de Programação I - Linguagem Pascal