110 likes | 267 Views
TRABAJO PRACTICO Nº2. Nombre: Ignacio D. Roca. C. Ejercicio Nº 1 TP 2. numero. verdadero. numero= 0. nulo. verdadero. Numero> 0. positivo. falso. negativo. f. Ejercicio nº1 pantalla. Private Sub CommandButton1_Click() Dim número1 As Integer número1 = Val(TextBox1)
E N D
TRABAJO PRACTICO Nº2 Nombre: Ignacio D. Roca
C Ejercicio Nº 1 TP 2 numero verdadero numero= 0 nulo verdadero Numero> 0 positivo falso negativo f
Private Sub CommandButton1_Click() • Dim número1 As Integer • número1 = Val(TextBox1) • If número1 = 0 Then • Label2 = ("El número es nulo") • Else • If número1 > 0 Then • Label2 = ("El número es Positivo") • Else • Label2 = ("El número es Negativo") • End If • End If
C A>0 AND B>0 AND C>0 AND D>0 A A+B+C+D B f No todos son `positivos C Ejercicio nº2 TP 2 D
c A<0B<0 A 0<AB<0 B Ejercicio nº3 TP 2 0<A 0<B B<00<A C