Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
41) Criar um algoritmo em PORTUGOL que leia o um número inteiro entre 1 e 7 e<br />
escreva o dia da semana correspondente. Caso o usuário digite um número fora desse<br />
intervalo, deverá aparecer uma mensagem informando que não existe dia da semana<br />
com esse número.<br />
algoritmo L2P41;<br />
var<br />
inteiro: NUM;<br />
início<br />
leia(NUM);<br />
se ( NUM < 1 ) ou ( NUM > 7 ) então<br />
imprima("número digitado, não se relaciona a um dia da semana");<br />
senão-se ( NUM = 1 ) então<br />
imprima("Domingo");<br />
senão-se ( NUM = 2 ) então<br />
imprima("Segunda-Feira");<br />
senão-se ( NUM = 3 ) então<br />
imprima("Terça-Feira");<br />
senão-se ( NUM = 4 ) então<br />
imprima("Quarta-Feira");<br />
senão-se ( NUM = 5 ) então<br />
imprima("Quinta-Feira");<br />
senão-se ( NUM = 6 ) então<br />
imprima("Sexta-Feira");<br />
senão<br />
imprima("Sábado");<br />
fim-se<br />
fim<br />
program l2p41;<br />
var<br />
NUM: integer;<br />
begin<br />
write('Digite um numero relativo a um dia da semana: ');<br />
readLn(NUM);<br />
if ( NUM < 1 ) or ( NUM > 7 ) then<br />
writeLn('N umero digitado, nao se relaciona a um dia da semana')<br />
else<br />
if ( NUM = 1 ) then<br />
writeLn('Domingo')<br />
else if ( NUM = 2 ) then<br />
writeLn('Segunda-Feira')<br />
else if ( NUM = 3 ) then<br />
writeLn('Terça-Feira')<br />
else if ( NUM = 4 ) then<br />
writeLn('Quarta-Feira')<br />
else if ( NUM = 5 ) then<br />
writeLn('Quinta-Feira')<br />
else if ( NUM = 6 ) then<br />
writeLn('Sexta-Feira')<br />
else<br />
writeLn('Sabado');<br />
end.<br />
<strong>UFMG</strong> – ICEx – <strong>DCC</strong> – Programação de Computadores – 2º. Sem 2005 – David Menoti 56
Change language