Algoritmo
Enviado por fagu24 • 19 de Mayo de 2014 • 459 Palabras (2 Páginas) • 203 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
...