Foros Club Delphi - Suma de números pares que hay entre dos números

Página 2 de 2

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Lazarus, FreePascal, Kylix, etc. (https://www.clubdelphi.com/foros/forumdisplay.php?f=14)

- - Suma de números pares que hay entre dos números (https://www.clubdelphi.com/foros/showthread.php?t=91768)

escafandra

26-04-2017 22:13:07

Cita:

Empezado por roman (Mensaje 515984)

Coincido. Pequeño reto:

Hallar la fórmula ahora para la suma de impares entre dos números dados :)

LineComment Saludos

Código Delphi [-]function SumaImPares(n, m: Integer): Integer; 
begin
   dec(n, n and 1);
   inc(m, m and 1);
   Result:= MulDiv(m-n, n+m, 4);
end;

:D

Saludos.

roman

26-04-2017 22:47:29

¡Anda! ¡Estupendo!

LineComment Saludos

La franja horaria es GMT +2. Ahora son las 13:29:23.

Página 2 de 2