algoritmos
Universidad Anáhuac México Norte
Algoritmos y ProgramaciónN° de Práctica
3Lunes 30 de septiembre de 2013
Objetivo
Aprender el uso del next
Problema
Obtener del 1 al 10
Marco TeóricoEjercicio 18
E
Pedir x=1
P
-
S
Imprimir del 1 al 10
PUBLIC SUB Main()
DIM x AS Byte
FOR x=1 TO 10 STEP 1
PRINT x
NEXT
ENDObjetivo
Practicar el Next
Problema
Calcular las tablas de multiplicar del 1 al 10
Marco Teórico
EJERCICIO 19
E
Pedir x
Pedir y
P
Multiplicar x*yS
Imprimir
Tabla del 1 al 10
PUBLIC SUB Main()
DIM x AS Byte
DIM y AS Byte
FOR x=1 TO 10
FOR y=1 TO 10
PRINT x;"*";y;"=";x*y
NEXT
NEXT
ENDObjetivo
Practicar el Next
Problema
Conversion de Farh a Cent
Marco Teórico
EJERCICIO 20
E
Introducir datos Farh
P
Convertir Farh a Cent
SImprimir Temperatura en Cent
PUBLIC SUB Main()
DIM farh AS Integer
DIM cent AS Float
PRINT"farh\t cent \n..."
FOR farh=0 TO 300 STEP 20
cent=5*(farh-32)/9
PRINTfarh;"\t";cent
NEXT
END
Objetivo
Practicar
Problema
Calcular x,x2,x3 , 1/x y x!
Marco Teórico
Ejercicio 21
E
Pedir un número detres dígitos
P
Determinar unidades, decenas, y centenas
S
Imprimir escrita la cifra de tres números
PUBLIC SUB Main()
DIM numero AS Integer
DIM uni AS Integer
DIM dece AS...
Regístrate para leer el documento completo.