Scheme: Calcular la nota definitiva de un estudiante

En esta ocasión les traemos el siguiente ejercicio en el idioma Scheme:
Calcular la nota definitiva de un estudiante

El programa debe calcular la nota definitiva de un estudiante dadas sus 3 notas (parcial 1, parcial 2, quices) y el estudiante también debe ingresar el nombre de la materia las cuales serán (calculo, fundamentos, inglés, deporte) y cada materia debe tener diferentes porcentajes en los parciales y quices.



Toma de pantalla del código:



Código:

; contrato
; calcula_def: simbolo num num num -> numero
; proposito: calcular la nota definitiva, teniendo como referencia el nombre de la materia
;(simbolo) y sus tres notas (numeros - parcial 1, parcial 2, quices)

; plantilla

(define (calcula_def materia n1 n2 n3)
(cond                                  
[(symbol=? materia 'calculo) (+ (* n1 0.3 ) (* n2 0.3) (* n3 0.4))]
[(symbol=? materia 'fundamentos) (+ (* n1 0.25 ) (* n2 0.45) (* n3 0.3))]
[(symbol=? materia 'ingles) (+ (* n1 0.5 ) (* n2 0.2) (* n3 0.3))]
[(symbol=? materia 'deporte) (+ (* n1 0.7 ) (* n2 0.2) (* n3 0.1))] 
[else "la materia no esta registrada"])
)



; prueba
(calcula_def 'calculo 3 2.8  4.5)
(calcula_def 'fundamentos 4.5 3.8 4.2)
(calcula_def 'ingles 5.0 4.9 4.2)
(calcula_def 'deporte 5.0 5.0 5.0)
Compartir en facebook twitter Google tumblr pinterest

Entradas similares

0 Comentarios