Denis Alves de Oliveira

Olá @Simon Viegas Realmente eu errei ali no 0..7, na outra era para ser 8..10, mas minha duvida era somente o porque passar mesmo se digitar um número maior que dez, esse round ai foi o professor que colocou, sou iniciante mas esses exercícios básicos consigo desenvolver só tenho essas dúvidas. [trecho sobre outro tópico removido]

Program exercicio_lista1_1 ; var n1,n2,n3,n4,media:real; nota_final:integer; Begin Write ('Escreva a primeira nota de zero a dez:'); readln (n1); Write ('Escreva a segunda nota de zero a dez:'); readln (n2); Write ('Escreva a terceira nota de zero a dez:'); readln (n3); Write ('Escreva a quarta nota de zero a dez:'); readln (n4); media := (n1+n2+n3+n4)/4; nota_final := round (media); writeln (' '); writeln (' '); case nota_final of 0..7 : begin writeln ('As notas informadas foram: ',n1:0:2,' , ',n2:0:2,' , ',n3:0:2,' e ',n4:0:2 ); writeln ('A média do aluno é: ', nota_final); writeln (' O aluno está Reprovado!'); writeln ('Informe notas de zero a dez!'); end; 7..10 : begin writeln ('As notas informadas foram: ',n1:0:2,' , ',n2:0:2,' , ',n3:0:2,' e ',n4:0:2 ); writeln ('A média do aluno é: ', nota_final); writeln (' O aluno está Aprovado!'); end; else writeln ('Informe notas de zero a dez!'); end; end. Fiz esse código básico em pascal ele está rodando normalmente mas, o que eu gostaria de saber é se tem uma maneira de não executar o restante do código se digitar um numero maior que dez. tipo esse else ai só funciona se o valor da Nota_Final for maior que dez.