Ayuda

[luisito2011]

lo siento por no leer.. solo estoy unoj minutos.. en internet... a ver si me responden.. pero bueno cuando pueda... lo ago ... ok

[ecfisa]

Empezado por luisito2011

lo siento por no leer.. solo estoy unoj minutos.. en internet... a ver si me responden.. pero bueno cuando pueda... lo ago ... ok

Hola luisito2011.

Si no te liás con la terminología y el código, el problema es muy pero muy sencillo... Se reduce a: Si hay una variable cuyo valor sea 0,
mostrar 'Cero' sino mostrar 'No', entonces:

Código Delphi [-]
  if (n1.ObtenerValor=0) or (n2.ObtenerValor=0) or
     (n3.ObtenerValor=0) or (n4.ObtenerValor=0) then
   Writeln('Cero')
  else
   Writeln('No');

Un saludo.