Pascal: IF básico
Comprobación básica de condiciones, en lenguaje Pascal
Lenguaje: Pascal (compilador: FreePascal)
Categoría: Básico
(* Fuente procedente de ErrorDeSintaxis.es *)
(* Comprobación básica de condiciones, en *)
(* lenguaje Pascal *)
(* Lenguaje: Pascal *)
(* Compilador: FreePascal *)
(* Nivel: Básico *)
(* Disponible desde 28/06/2011 *)
(* Aportado por Nacho *)
(* Autor original: Nacho Cabanes *)
(* Web original: http://www.aprendeaprogramar.com/mod/resource/view.php?id=80 *)
program if1; var numero: integer; begin writeln('Escriba un número'); readln(numero); if numero>0 then writeln('El número es positivo'); end.
Resultado:
Escriba un número 12 El número es positivo.