Considere o trecho de código abaixo, escrito na linguagem Pascal Program CASO; Var valor: byte; Begin Writeln('Digite um valor de 1 a 7: ');