Pregunta del dia

Necesitas saber si tu amigo Pedro tiene bien anotado tu número de celular, pero no puedes preguntarle directamente. Debes escribir la pregunta en una tarjeta y dársela a Malena, que le llevará la tarjeta a Pedro y volverá con su respuesta. ¿Qué debes escribir en el papel, además de la pregunta, para asegurarte que Pedro pueda entender el mensaje y Malena no pueda leer tu número de teléfono?

tp 3

TP de Aplicación FOR – NEXT- RND DO WHILE

1-     Ingresar 10 números, luego mostrar cuantos son mayores a 20 y cuantos menores a 10.

Resolver haciendo el formulario y corrigiendo los posibles errores que se presentaran al ejecutar el programa

Dim x,a,c,m as integer

For x= 1 to 10

      Rem la siguiente línea permite ingresar un numero en una ventana

     A=inputbox(“ingrese numero”)

     Rem esta línea sirve para mostrar en una etiqueta el numero ingresado

     Label1= label1 & A & “          “ 

     If a>20 then

         C=c+1

           Endif

      Next x

      Label2= “ La cantidad de números mayores a 20 son “ & c

    

2-     Generar 100 números al azar entre 1 y 20, luego informar cuantos fueron iguales a 10

3-     Generar 500 números al azar entre 1 y 10, luego informar cuantos de cada uno se repitieron

4-      Ingresar números hasta que se  ingrese un cero, luego informar cuantos números se ingresaron, la suma de los números ingresados y el promedio

evaluacion

Lo que hay que saber
Para que se utilizan las funciones LEN, LEFT, RIGHT, MID
Que funcionan los ciclos FOR-NEXT, DO WHILE-LOOP
Principales propiedades de los Botones (caption, forecolor, font, passwordchar)
TEXTBOX
LABEL
LISTBOX
COMBOBOX
OPTIONBUTTON

Tipos de Variables
STRING, INTEGER, DOBLE, LONG, SINGLE

Instrucciones condicionales
IF THEN ELSE ENDIF
SELECT CASE - ENDCASE

Instrucciones para ingreso de valores
INPUTBOX

Random
RND()

TP 2

Trabajo Practico

1-     Escribir para que se utilizan y como se deben escribir las siguientes sentencias

LEN

LEFT

RIGHT

MID

2-     Hacer un programa que realice lo siguiente:

Ingresar una palabra, informe la cantidad de letras, muestre la primera y la ultima letra.

3-     Hacer un programa que pida el ingreso de una palabra y luego la imprima en forma vertical

4-     Ingresar una palabra (ejemplo : alegria) y luego imprimirla de la siguiente manera

Alegria

Alegri

Alegr

Aleg

Ale

Al

A

5-     Ingresar una palabra, y luego una letra. Indicar si la letra ingresada pertenece o no a la palabra. En el caso que pertenezca indicar en que posición esta

6-     Ingresar una frase y luego mostrar cuantas letras A tiene dicha frase.

7-     Idem anterior pero indicando la cantidad de Vocales que tiene la frase

8-     Ingresar una frase y luego separar las palabras una debajo de otra. ( por ejemplo: Hoy es un lindo día de sol)

HOY

ES

UN

LINDO

DIA

DE

SOL

9-     Para que se utilizan las funciones Lcase y Ucase

10- Para que se utilizan las funciones TRIM, LTRIM y RTRIM, dar ejemplos

Ejemplo : Ingresar 2 numeros y luego mostrar cual es el mayor, considerar que no van a ser iguales
 
Private Sub Command1_Click()
Dim a, b As Integer
a = Text1.Text
b = Text2.Text
If a > b Then
   Label3.Caption = " el mayor es " & a
   Else
   Label3.Caption = " el mayor es " & b
 
End If
End Sub

TP 1 DIAGRAMACION

1) Ingresar dos números naturales y mostrar el menor o “iguales” en caso de quesean iguales.

2) Ingresar dos números naturales y mostrar el mayor o “iguales” en caso de que sean iguales.

3) Ingresar tres números y mostrar el mayor (asuma que los n° son distintos).

4) Ingresar tres números y mostrar el mayor y el menor (asuma que los n° son distintos).

5) Repita el ejercicio anterior pero utilizando el operador lógico Y en las condiciones para minimizar su cantidad.

6) Diseñar un algoritmo que imprima el número de docena (“primera”, “segunda” o“tercera”) dado el resultado de una jugada de ruleta. Utilizar el operador lógico Y.

7) Diseñar un algoritmo que imprima “par” si el valor ingresado es 2, 4, o 6; “impar” si es 1, 3, o 5; y en cualquier otro caso “error”. Utilizar el operador lógico O.

8) Diseñar un algoritmo que, dado un número, imprima “válido” si está entre 0 y 10 e“inválido” si es mayor a 10 o menor a cero.

a. Resolver el ejercicio con el operador lógico Y.

b. Resolver el ejercicio con el operador lógico O.

9) Una empresa desea calcular los nuevos salarios de sus empleados de la siguiente forma: quienes ganan hasta $ 500.000 tendrán un incremento del 10%, quienes devengan más de $ 500.000 y hasta 800.000 recibirán un aumento del 8% y los demás del 5%. ¿Cuál será el valor del aumento? ¿Cuál será el valor del nuevo sueldo? Dato de entrada: sueldo.

Visual BASIC

Programación Orientada a Objeto

Entrar a VISUAL BASIC