ALGORITMOS 2

Actividad nº1

var arroz:numerico

var sal:numerico

var cebolla:numerico

var camarones:numerico

var pimenton:numerico

var comensales:numerico

inicio

cls ()

arroz= 0.5/4

sal= 1/4

cebolla= 200/4

camarones= 0.25/4

pimenton= 100/4

imprimir ("Ingrese cantidad de personas \n")

leer (comensales)

arroz= arroz*comensales

sal= sal*comensales

cebolla= cebolla*comensales

camarones= camarones*comensales

pimenton= pimenton*comensales

imprimir ("usted necesitara los siguientes ingrediente\n")

imprimir (arroz,"kg de arroz \n")

imprimir (sal,"g de sal \n")

imprimir (cebolla, "g de cebolla \n")

imprimir (camarones, "kg de camarones \n")

imprimir (pimenton, "g de pimenton \n")

fin

Actividad nº2

var producto1: cadena

var producto2 : cadena

var precio1 : numerico

var precio2 : numerico

var cantidad1 : numerico

var cantidad2 : numerico

var iva1: numerico

var iva2 : numerico

inicio

cls ()

imprimir ("ingresar el primer producto ")

leer (producto1)

imprimir ("el precio1: ")

leer (precio1)

imprimir ("la cantidad1: ")

leer (cantidad1)

imprimir ("ingresar el segundo producto ")

leer (producto2)

imprimir ("el precio2: ")

leer (precio2)

imprimir ("la cantidad2: ")

leer (cantidad2)

cls()

imprimir ("supermercado estrella-ticket de compra \n")

iva1= precio1 + (precio1/100)*21

iva2= precio2 + (precio2/100)*21

imprimir (producto1, "      $",iva1," total $",iva1*cantidad1,"\n")

imprimir (producto2, "      $",iva2," total $",iva2*cantidad2,"\n")

imprimir ("Total a abonar:$",iva1*cantidad1 + iva2*cantidad2,"\n")

fin

Actividad nº3

var empleado: cadena

var sueldoh: numerico

var horast: numerico

var totalt: numerico

inicio

cls()

imprimir("empleado:")

leer(empleado)

imprimir("sueldoh:")

leer(sueldoh)

imprimir("horast:")

leer(horast)

imprimir("totalt", sueldoh*horast)

fin

algoritmos 1

PUNTO 2

var base: numerico

var altura: numerico

var lado2: numerico

var lado3: numerico

var superficie: numerico

var perimetro: numerico

inicio

cls ()

imprimir ("medida de la base \n")

leer (base)

imprimir ("medida de la altura \n")

leer (altura)

imprimir ("medida del 2° lado \n")

leer (lado2)

imprimir ("medida del 3°lado \n")

leer (lado3)

superficie = base*altura/2

Perimetro = base+lado2+lado3

imprimir ("superficie: ", superficie, "\n")

imprimir ("perimetro ", perimetro)

fin

PUNTO 3

var original: numerico

inicio

cls ()

imprimir ("ingrese numero \n")

leer (original)

imprimir ("tabla de multiplicar ", original, " es: \n")

imprimir (original, "x 0 = ", original*0, "\n")

imprimir (original, "x 1 = ", original*1, "\n")

imprimir (original, "x 2 = ", original*2, "\n")

imprimir (original, "x 3 = ", original*3, "\n")

imprimir (original, "x 4 = ", original*4, "\n")

imprimir (original, "x 5 = ", original*5, "\n")

imprimir (original, "x 6 = ", original*6, "\n")

imprimir (original, "x 7 = ", original*7, "\n")

imprimir (original, "x 8 = ", original*8, "\n")

imprimir (original, "x 9 = ", original*9, "\n")

imprimir (original, "x 10 = ", original*10)

fin

PUNTO 4

var a: numerico

var b: numerico

var c: numerico

inicio

cls()

imprimir ("ingresar un valor para A \n")

leer (a)

imprimir ("ingresar un valor para B \n")

leer (b)

imprimir ("valores intercambiados \n")

c = a

a = b

b = c

imprimir ("a es igual a ", a, "\n")

imprimir ("b es igual a ", b, "\n")

fin