Menu
Icon

Sacando numero par o impar pascal.

{


Siguiendo el mismo ejercicio en diversos idiomas ahora lo mostrare en pascal:


Program P3AE4 (input,output);
uses
crt;
Var
numero: Integer;
Begin
    writeln('Ingrese el valor del numero:');
readln(numero);          
if (numero mod 2 = 0) Then
    begin
                writeln('El numero introducido es par'); end;
        if (numero mod 2 <> 0 ) Then
             begin
    writeln('El numero introducido es impar:'); end;
  readkey;
end.








}

Utilizamos cookies propias y de terceros con finalidades analiticas y para mejorar tu experiencia de compras segun tus preferencias, mediante el analisis de tus habitos de navegacion y tu perfil. Puedes aceptar todas las cookies pulsando el boton "Aceptar" o gestionar tus preferencias en el panel de configuracion