Pascal/Turbo Pascal - consulta para diego romero :)

   
Vista:

consulta para diego romero :)

Publicado por Caro (5 intervenciones) el 05/05/2008 03:31:26
Realizar un programa que, en base al nombre de un estudiante y sus calificaciones, calcule el promedio de las mismas. De dicho estudiante se conocen 7 calificaciones (las cuales tienen un valor numérico comprendido entre 0 y 10, pudiendo ser la nota del estudiante un 5.50).

Program notas;
Var
sum, prom, nota: real;
nom: string [20];
i: integer;
begin
sum: =0;
Read (nom);
For i:=1 to 7 do
Begin
Read (nota);
sum:=sum+nota;
end;
prom:=sum/7;
Write (prom);
End.

q opinas??? esta bien para vos...??

muchas grax..!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:consulta para diego romero :)

Publicado por Diego Romero (997 intervenciones) el 05/05/2008 10:59:51
Básicamente está bien, pero hay detalles que se pueden mejorar, como por ejemplo, controlar que la nota ingresada no sea menor a cero ni mayor a 10 porque tal como está el programa puedes ingresar tranquilamente una nota tipo 12547.

Ah y usa ReadLn en vez de Read tanto en el string como en el real.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:consulta para diego romero :)

Publicado por Dani (159 intervenciones) el 06/05/2008 10:38:10
Declara una constante y úsala

CONST

NUMERO_NOTAS = 7;

Esto hace el programa más fácil de modificar
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar