Algoritmo
fagu2419 de Mayo de 2014
459 Palabras (2 Páginas)230 Visitas
Dados los lados de un cuadrilátero (en metros), informar la superficie del mismo.
CLS
INPUT “Ingrese el lado A:”, ladoA
INPUT “Ingrese el Lado B:”, ladoB
Superficie = ladoA * ladoB
PRINT Superficie ; “m2”
END
Dados los lados de un cuadrilátero (en metros), informar la superficie del mismo en cm2.
CLS
INPUT ladoA
INPUT ladoB
Superficie = ladoA * ladoB
PRINT Superficie * 100 ; “cm2”
END
Introducir tres números por teclado e imprimir el mayor y el menor.
CLS
INPUT A
INPUT B
INPUT C
IF A>B THEN
IF A>C THEN
PRINT A, “ es el mayor”
ENDIF
ENDIF
IF B>A THEN
IF B>C THEN
PRINT B, “es el mayor”
ENDIF
ENDIF
IF C>A .AND. C>B THEN
PRINT C, “es el mayor”
ENDIF
………… REPETIR EL PROCESO PARA EL MENOR (SE PUEDE SIMPLIFICAR COMO EN EL ULTIMO IF
END
Introducir los lados de un triángulo y visualizar por pantalla si dicho triángulo es equilátero, isósceles o escaleno.
CLS
INPUT “Ingrese el lado A de un triángulo”, A
INPUT “Ingrese el lado B de un triángulo”, B
INPUT “Ingrese el lado C de un triángulo”, C
IF A=B AND B=C THEN
PRINT “El triángulo es EQUILATERO”
ENDIF
IF A=B OR B=C OR C=A THEN
PRINT “El triángulo es ISOSCELES”
ENDIF
IF A<>B AND B<>C THEN
PRINT “El triángulo es ESCALENO”
ENDIF
END
Introducir 4 números por teclado y visualizar la suma del primero y el tercero y el producto del segundo y el cuarto.
CLS
INPUT A
INPUT B
INPUT C
INPUT D
PRINT “Suma del A + C”, A+C
PRINT “Producto de B * D”, B*D
END
Crear un programa que imprima los 100 primeros números primos y su suma.
CLS
PRINT 1
PRINT 2
PRINT 3
PRINT 4
PRINT 5
PRINT 6
PRINT 7
num = 7
DO
num = num + 1
IF num/2 = INT(num/2) THEN
IF num/3 = INT(num/3) THEN
IF num/5 = INT(num/5) THEN
IF num/7 = INT(num/7) THEN
ELSE
PRINT num
Acu = Acu + num
ENDIF
ENDIF
ENDIF
ENDIF
LOOP UNTIL num = 100
PRINT “La sumatoria es :”, Acu
ENDIF
Crear un programa que imprima las tablas de multiplicar de un número que el usuario introduzca por teclado.
CLS
INPUT “Ingrese la tabla de multiplicar que desea ver:”, tabla
DO
Mult = Mult + 1
PRINT Mult * tabla
LOOP UNTIL Mult = 10
END
Realizar un algoritmo que permita ingresar una medida en metros y la convierta en millas marinas. (1Milla marina = 1852 mts)
CLS
INPUT “Ingrese una distancia en metros:”, metros
PRINT “Son Millas Marinas:”, metros * 1,852
END
Dado un valor en pesos convertirlos a dólar, también debemos ingresar la cotización del dólar del día. (por ejemplo 3,75)
CLS
INPUT “Ingrese un valor en Pesos:”, Pesos
INPUT “Ingrese la Cotización del Dólar del día:”, Cotiza
PRINT “Son Dólares:”, Pesos / Cotiza
END
Dado un valor en pesos indicar cual seria ese valor si le recargamos un
...