Atividade 01

)Para que a divisão entre 2 números possa ser realizada, o divisor não pode ser nulo (zero). Escreva um programa para ler 2 valores e imprimir o resultado da divisão do primeiro pelo segundo. OBS: O programa deve validar a leitura do segundo valor (que não deve ser nulo). Enquanto for fornecido um valor nulo a leitura deve ser repetida. Utilize a estrutura Enquanto/Faça na construção da repetição de validação.

var

dividendo, divisor:real

inicio

escreva("Digite o valor a ser dividido: ")

leia(dividendo)

escreva("Digite por quanto quer dividir: ")

leia(divisor)

enquanto divisor = 0 faca

escreva("Digite um valor diferente de zero: ")

leia(divisor)

fimenquanto

escreva(dividendo/divisor)

fimalgoritmo

2)Altere a solução do exercício anterior para que seja impressa a mensagem Valor inválido! caso o segundo valor informado seja zero.

var

dividendo, divisor:real

inicio

escreva("Digite o valor a ser dividido: ")

leia(dividendo)

escreva("Digite por quanto quer dividir: ")

leia(divisor)

enquanto divisor = 0 faca

escreva("Valor Invalido: ")

leia(divisor)

fimenquanto

escreva(dividendo/divisor)

fimalgoritmo

3)Altere a solução do exercício 1 para que seja impressa a mensagem Outra Divisão? Enquanto o usuário desejar repetir o processo.

var

dividendo, divisor:real

resposta:caracter

inicio

resposta <- "S"

enquanto resposta = "S" faca

escreva("Digite o valor a ser dividido: ")

leia(dividendo)

escreva("Digite por quanto quer dividir: ")

leia(divisor)

enquanto divisor = 0 faca

escreva("Valor Invalido: ")

leia(divisor)

fimenquanto

escreval("total: ",dividendo/divisor)

escreva("Quer fazer outra divisão? S/N: ")

leia(resposta)

fimenquanto

fimalgoritmo

4)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)

...