Portugol

Caro cursista, como vimos em nossa vídeo aula, esta disciplina é de caráter eminentemente prático, portanto é essencial que você teste, pratique, treine incansavelmente até atingir um aperfeiçoamento maior no que se refere à programação. Assim, sugerimos mais algumas atividades para que você exercite ainda mais as técnicas adquiridas com o estudo de nossa disciplina. Lembre-se, você possui um fórum de discussão no ambiente para tirar suas dúvidas com relação a esta tarefa.

Mãos a obra!!!

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