Ejercicios de programación en Pascal (Turbo Pascal)
C/C++/C# HTML Java JavaScript Linux PHP Python Swift
 Inicio > Ejercicios > Pascal > Alternativa simple > 1 > Solución

Solución del Ejercicio 1 - Cambio de signo (Alternativa simple - Pascal)
program AAS12011;

uses Crt;

var Numero : Real;

begin
   ClrScr;
   Write( 'Introduzca numero (real): ' );
   ReadLn( Numero );

   if ( Numero < 0 ) then
      Write( -Numero )
end.
Programa (.PAS): Cambio de signo

(Véase el apartado 2.2 Alternativa simple ( de nuevo la instrucción if ) del Curso de Pascal).
 Páginas relacionadas
  · Solución del ejercicio en pseudocódigo, ordinograma y lenguaje C.
  · Instrucción alternativa simple (if then) en la sintaxis del Pascal.
  · Listado de ejercicios de programación resueltos en diferentes lenguajes.