Calcular cuanto hay de plata segun billetes y monedas

[[Delphius]]

Código Delphi [-]
total := 0.0;
for i := 1 to CANT_DENOMINACIONES do
total := total + (Denominaciones[i].Valor * Denominaciones[i].Cantidad);

Estoy con Chris, eso es tarea para un chico de primaria. No veo donde está el problema... Si te explicaras mejor y nos describieras el problema y el contexto en el que estás evaluando quizá podríamos descubrir en donde está fallando la lógica.
¿La denominaciones y la cantidades son fijas? ¿La extraes de una base de datos? ¿Desde un archivo?

En términos abstractos el código que expuse es suficiente para ilustrar el procedimiento a aplicar. Ahora hay que bajar eso a tierra y aplicarlo a tu caso.

Saludos,