Aula 7

Exercícios de consolidação

##Exercícios de fixação## Estrutura Condicional – Composta (Voltar ao Índice)

01- Sabendo que uma milha marítima equivale a um mil, oitocentos e cinquenta e dois metros e que um quilômetro possui mil metros, fazer um programa para converter milhas marítimas em quilômetros.

02- Calcular e exibir a tensão (V) de um determinado circuito eletrónico a partir dos valores da resistência (R) e corrente elétrica (I) que serão digitados. Utilize a lei de Ohm.

Quando essa lei é verdadeira num determinado condutor mantido à temperatura constante, este denomina-se condutor ôhmico. A resistência de um dispositivo condutor é dada pela fórmula:

R = V/I ou V = R I

Onde:

V é a diferença de potencial elétrico (ou tensão, ou ddp) medida em volt (V);

I é a intensidade da corrente elétrica medida em ampère (A) e

R é a resistência elétrica medida em ohm (Ω).

03- Digitar o valor de uma temperatura em graus Celsius, calcular e exibir sua temperatura equivalente em Fahrenheit.

04- Digitados três valores distintos. Exibir o maior deles.

Program Pzim ;

var a, b, c:real;

Begin

readln(a);

readln(b);

readln(c);

If (a>b)and (b>c)then

writeln('maior a')

else

if (b>a) and(b>c) then

writeln('maior b')

else

writeln('maior c');

End.

05- Digitar o peso e a altura de uma determinada pessoa. Após a digitação, mostrar se esta pessoa está ou não com seu peso ideal.

R=peso/altura².

Relação peso/altura² (R)	Mensagem
R < 0,0020	Abaixo do peso
0,0020 <= R <0,00 25	Peso ideal
R >= 0,0025	Acima do peso

06- Faça um programa para ler três números e escrever se estes podem ou não formar um triângulo.

Program Pzim ;

var l1, l2, l3: real;

Begin

readln(l1);

readln(l2);

readln(l3);

if (l1+l2<l3) or (l1+l3<l2) or (l2+l3<l1) then

writeln('não dá')

else

writeln('OKOKOKOKOKKOKOK');

End.

Observação – Para formar os lados de um triângulo cada um dos valores tem que ser menor que a soma dos outros dois.

07- Faça um programa para ler três números e se estes poderem formar um triângulo dizer se o triângulo é “EQUILÁTERO”, “ISÓCELES” OU “ESCALENO”.

Program Pzim ;

var l1, l2, l3:real ;

Begin

readln(l1);

readln(l2);

readln(l3);

If (l1=l2)and (l2=l3) then

writeln('equilátero todos os lados iguais')

else

if (l1<>l2)and(l2<>l3)then

writeln('escaleno todos os lados diferentes')

else

writeln('isósceles');

End.

Triângulo equilátero Todos os lados são iguais	Triângulo isósceles Dois lados iguais e um diferente	Triângulo escaleno Todos os lados são diferentes

08 – Digitar o peso, o sexo e a altura de uma determinada pessoa. Após a digitação, exibir se esta pessoa está ou não com seu peso ideal. Veja tabela da relação peso/altura².

Program Pzim ;

var sexo:real;

p, a, r:real ;

Begin

writeln('digite o sexo da pessoa (F - Feminino 1) (M- Masculino)');

readln(sexo);

writeln('peso');

readln(p);

writeln('zl');

readln(a);

r:=p*(a*a);

if (sexo=1) then

begin

if r<0.0019 then

writeln('mulher a abeixo do peso',r)

else

if r>=0.0024 then

writeln('mulher a acima do peso',r)

else

writeln('mulher a ok do peso',r);

end

else

begin

if r<0.0019 then

writeln('mcccculher a abeixo do peso',r)

else

if r>=0.0024 then

writeln('mcccculher a acima do peso',r)

else

writeln('mcccculher a ok do peso',r);

end;

End.

Peso/altura² (R) – Femininos	Mensagem	peso/altura² (R) - Masculinos	Mensagem
R < 0,0019	Abaixo do peso	R < 0,0020	Abaixo do peso
0,0019 <= R < 0,0024	Peso ideal	0,0020 <= R < 0,0025	Peso ideal
R >= 0,0024	Acima do peso	R >=0,0025	Acima do peso

ENVIAR AO PROFESSOR (PROFCARLOS2006@GMAIL.COM)

(Voltar ao Índice)