• Domingo 22 de Diciembre de 2024, 17:25

Autor Tema:  Help  (Leído 1251 veces)

manreg08

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Help
« en: Jueves 11 de Octubre de 2007, 18:13 »
0
Hola, yo estoy haciendo un programa y mi pregunta es la siguiente yo hago una funcion  que me saque el promedio de los valores de una matriz, a ese valor que me da lo puedo volver a poner en un procedimiento para que me diga cuales son los valores que están por debajo del promedio en un vector???

Enko

  • Miembro de PLATA
  • *****
  • Mensajes: 1562
  • Nacionalidad: 00
    • Ver Perfil
Re: Help
« Respuesta #1 en: Jueves 11 de Octubre de 2007, 21:47 »
0
para tomar un valor de un procedimiento tienes que usar funciones:
Código: Text
  1.  
  2. function Promedio(Param1, Param2: Integer): Real;
  3. begin
  4.     Promedio := (Param1+Param2)/2;
  5. end;
  6.  
  7.  
Luego simplemente hace:
Código: Text
  1.  
  2. var
  3.    Promedio1: Real;
  4. begin
  5.    Promedio1 := Promedio(2,5);
  6.    WriteLn(Promedio1);
  7. end;
  8.  
  9.