viernes, 7 de septiembre de 2007

If

If

En este programa se realiza un se debe tomar una decisión (si – no), y acontinuacion mostrar el resultado o una frase o palabra.

Ejercicio 1:
Un programa que me ingrese un numero y me muestre si es par o impar.

Module Module 1

Dim num As Integer

Sub Main ( )

Console.Write(“ingrese num:”)
Num = Console.Readline

If num mod 2 = 0 Then
Console.Writeline(“PAR”)

Else
Console.Writeline(“IMPAR”)

End If

Console.Readline( )

End Sub
End Module

No hay comentarios: