EJEMPLO N°1
|
2 (Interger) Dim A, B As Interger
3 (Double) Dim C, D, E As Double
Label 1= “Introduzca el primer dato”
Label 2= “Introduzca el segundo dato”
Label 3= “Introduzca el tercer dato”
Label 4= “Introduzca el cuarto dato”
E = A+B+C+D
Label 5 = (resultado de la suma & E)
EJEMPLO N°2
Dim H As Interger
Dim G As Interger
Dim J As Interger
Label 1= “Introduzca la primera variable”
Label 2= “Introduzca la segunda variable”
J = H/G
Label (resultados de la división&)
EJEMPLO N°3
Dim M As Interger
Dim K As Interger
Dim P As Interger
Label 1= “Introduzca el primer dato”
Label 2= “Introduzca el segundo dato”
M= k*p
Label = (resultado de la multiplicacion & E)
No hay comentarios:
Publicar un comentario