Reflej0

*Cuente los numeros negativos y los pares.

	ORG	$0000
Dirini	RMB	2
DirFin	RMB	2
Neg	RMB	1
Par	RMB	1

	ORG	$C000
	LDX	DirIni

Reflej0

* Dado un numero entero sin signo de 8 bits, informar:
* centenas, decenas y unidades en tres posiciones de memoria

	ORG	$0000
num	RMB	1	* el mister en cuestion
cen	RMB	1	
dec	RMB	1	
uni	RMB	1	

	ORG	$C000

Reflej0

*Encontrar un numero en un vector e indicar en que posicion de memoria esta.

	ORG	$0000
Dirfin	RMB	2
Cant	RMB	1
Dato	RMB	1
Memoria	RMB	2

	ORG	$C000
	LDX	DirFin

Reflej0

* Dado un vector de numeros signados del que se conoce direccion inicial (dirIni)
* y la cantidad de elementos (cant) obtener la suma de los positivos (sumap)
* la cantidad de impares (cimpar), y la posición del primer cero (ppc)
	ORG 	$0000	
dirIni	RMB	2
cant	RMB	1	* cantidad de elementos del vector
sumap	RMB	2	* suma de los positivos
cimpar	RMB	1	* cantidad de impares
ppc	RMB	1	* posicion dentro del vector (subindice) del primer cero
* si en lugar de la posicion (subindice) estuviera pidiendo direccion

Reflej0

function [raizaproximada, iteraciones] =  biseccion(funcion, A, B, Tolerancia, Iteracionesmaximas)
    raizaproximada = A; // Esto es para que en la primera iteracion no de error.
    iteraciones = 0;
    while 1
        raizaproximadaanterior = raizaproximada;
        raizaproximada = (A+B)/2;
        errorabsoluto = abs((raizaproximada-raizaproximadaanterior)/raizaproximada)*100;
        r = funcion(raizaproximada);
        a = funcion(A); // Evaluo A en la funcion, y lo guardo en a.
        b = funcion(B); // Evaluo B en la funcion y lo guardo en b.

Reflej0

function [raizaproximada, iteraciones] = newton(funcion, aproximacioninicial, Tolerancia, Iteracionesmaximas)
    aprox= aproximacioninicial;
    while 1
        raizaproximada = aprox - funcion(aprox)/numderivative(funcion, aprox);
        errorabsoluto = abs((raizaproximada-aprox)/raizaproximada)*100;
        aprox = raizaproximada;
        iteraciones = iteraciones + 1;
        if(errorabsoluto < Tolerancia | iteraciones  == Iteracionesmaximas ) then
        break
        end

Reflej0

/*
Version de PHP 5.6
Para que funcione esto se deben seguir estos pasos:
1) http://php.net/manual/es/ref.pdo-sqlsrv.php Descarga de SQLSRV 3.0 -> To download PHP driver for SQL -> Windows PHP driver ->SQLSRV32.EXE
2) Descomprimir los archivos en xampp\php\ext
3) En XAMPP -> Apache -> Config -> PHP.ini ->
extension=php_sqlsrv_56_ts.dll
extension=php_sqlsrv_56_nts.dll
extension=php_pdo_sqlsrv_56_ts.dll
extension=php_pdo_sqlsrv_56_nts.dll

Reflej0

///Intercambio utilizando algebra de bool.
void intercambio_algebra_bool(int* a, int* b)
{
    *a ^= *b;
    *b ^= *a;
    *a ^= *b;
}

///Intercambio utilizando operadores += -=
void intercambio_aritmetica_mejorada(int* a, int* b)

Reflej0

<?php
public function validarComprobante($comprobante)
{
    /*No se incluyen los pasos previos de obtencion del WSAA*/
    $serviceUrl = "https://wswhomo.afip.gov.ar/WSCDC/service.asmx?WSDL"; // Homologación.
    $_serviceUrl = "https://servicios1.afip.gov.ar/WSCDC/service.asmx?WSDL"; // Producción.
    $client = new \Soapclient($serviceUrl);

    //Lote de prueba.
    $parametros = new \stdClass();

Reflej0

import java.math.BigInteger;

public class Ejercicio {

	public static void main(String[] args) 
	{
		int k = 78557;
		int n = 1000000;
		boolean resultado = esSierpinski(k);
		System.out.print(resultado);