Ayuda con una duda!
Publicado por Christian Guzmán (1 intervención) el 29/04/2015 19:54:06
Hola a todos...
Estudiando en un libro me encontré con unos ejemplos en pascal, y entiendo unas cosas del lenguaje, pero no he podido entender que significa MAX(CARDINAL) en el siguiente código:
Lo que no entiendo es cuales son los valores que compara para encontrar el MAX, porque hay varias cosas declaradas CARDINAL...
Agradezco su ayuda, un saludo!
Estudiando en un libro me encontré con unos ejemplos en pascal, y entiendo unas cosas del lenguaje, pero no he podido entender que significa MAX(CARDINAL) en el siguiente código:
Lo que no entiendo es cuales son los valores que compara para encontrar el MAX, porque hay varias cosas declaradas CARDINAL...
Agradezco su ayuda, un saludo!
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
CONST n = ...; (* num. tipos de monedas distintos del sistema *)
L = ...; (* cantidad a conseguir *)
TYPE TIPOMONEDA = ARRAY[1..n] OF CARDINAL;
VECTOR = ARRAY[0..L] OF CARDINAL;
PROCEDURE Cambio(VAR C:VECTOR;L,n:CARDINAL;VAR T:TIPOMONEDA):CARDINAL;
VAR i,j:CARDINAL;
BEGIN
C[0]:=0;
FOR i:=1 TO n DO
FOR j:=1 TO L DO
IF (i=1) AND (j<T[i]) THEN
C[j]:=MAX(CARDINAL)
ELSIF i=1 THENC[j]:=1+C[j-T[1]]
ELSIF j>=T[i] THEN
C[j]:=Min2(C[j],1+C[j-T[i]])
(* ELSE C[j] no se modifica *)
END
END;
END;
RETURN C[L]
END Cambio;
Valora esta pregunta
0