Ver Mensaje Individual
  #6  
Antiguo 20-07-2007
Avatar de gerupc
gerupc gerupc is offline
Miembro
 
Registrado: jul 2007
Ubicación: Universidad de Deusto
Posts: 61
Reputación: 17
gerupc Va por buen camino
Hola,

De acuerdo, este programa está sacado de una hoja de ejercicios en Delphi para practicar en 1º de carrera, el codigo completo es:

Código Delphi [-]
PROGRAM EJER54; 
USES CRT; 
VAR i:INTEGER; 
VAR num,suma:REAL; 
BEGIN 
ClrScr; 
i:=0; 

REPEAT 
WRITE('Introduzca un numero: '); READLN(num); 
suma:=suma+num; 
i:=i+1; 
UNTIL i=5; 
WRITE('La media es: '); WRITELN(suma/i:5:2); 
END.

bien, pues lo que quiero es; que el programa me pida numeros 5 veces un numero, y que éste almacene los cinco numeros, para después yo decirle que haga la media.
Lo que no entiendo es la funcion que cumple la siguiente sentencia del bucle:

Código Delphi [-]
 
suma := suma + num;

Muchas gracias y un saludo,

Geru.
__________________
Mi Blog
---------------------
Universidad de Deusto
ESIDE-Escuela Superior de Ingenieros Deusto

Última edición por dec fecha: 20-07-2007 a las 23:34:30.
Responder Con Cita