Sistemas Computacionales Administrativos.

...

7:

Escribir 'Julio';

8:

Escribir 'Agosto';

9:

Escribir 'Septiembre';

10:

Escribir 'Octubre';

11:

Escribir 'Noviembre';

12:

Escribir 'Diciembre';

De Otro Modo:

Escribir 'Numero Erroneo';

FinSegun

FinProceso

[pic 9]

Página 77

1 Elabore un algoritmo para calcula: e imprimir el precio de un terreno del cual se los datos largo, ancho y precio por metro cuadrada. Si el terreno tiene más de 400 metros Cuadrados hace un descuento de 10 %

Proceso CostoTerreno3

Definir costo_metro,altura,anchura,desc_terreno,area_terreno,costo_terreno,desc_costo_terreno Como Real;

Escribir 'introduce la altura del terreno';

Leer altura;

Escribir 'introduce anchura del terreno';

Leer anchura;

Escribir 'Introduce el costo de cada metro';

Leer costo_metro;

area_terreno

costo_terreno

Si costo_terreno>400 Entonces

Escribir 'Se concede descuento del 10%';

desc_terreno

Escribir desc_terreno;

desc_costo_terreno

Escribir 'El costo de tu terreno, ya con descuento es de ';

Escribir desc_costo_terreno;

Sino

Escribir 'El costo del terreno es';

Escribir costo_terreno;

FinSi

FinProceso

[pic 10]

2 igual que el anterior, sólo que el terreno más de 500 metros cuadrados el descuento es de 17 % y si tiene más de 1000 el descuento es de 25 %.

Proceso CostoTerreno3

Definir costo_metro,altura,anchura,desc_terreno,area_terreno,costo_terreno,desc_costo_terreno Como Real;

Escribir 'introduce la altura del terreno';

Leer altura;

Escribir 'introduce anchura del terreno';

Leer anchura;

Escribir 'Introduce el costo de cada metro';

Leer costo_metro;

area_terreno

costo_terreno

Si area_tereno>500 Entonces

Escribir 'Se concede descuento del 17%';

desc_terreno

Escribir desc_terreno;

desc_costo_terreno

Escribir 'El costo de tu terreno, ya con descuento es de ';

Escribir desc_costo_terreno;

si area_terreno>1000 Entonces

Escribir 'Se concede descuento del 25%';

desc_terreno

Escribir desc_terreno;

desc_costo_terreno

Escribir 'El costo de tu terreno, ya con descuento es de ';

Escribir desc_costo_terreno;

FinSi

Sino

Escribir 'El costo del terreno es';

Escribir costo_terreno;

FinSi

FinProceso

[pic 11]

Página 78

Elabore un algoritmo para calcular e imprimir los valores de X y Y, teniendo como entrada el valor de X y calculando el de Y de acuerdo con las siguientes condiciones

Si X OentoncesYz3X.6

Si X 0 entonces YE X • 6

4. Elabore un algoritmo que imprima el costo de un pedido de un artículo del cual se tiene La descripción, la cantidad pedida y el precio unitario. Si la cantidad pedida excede de 50 unidades, se hace un descuento de 15 %.

5 Un cliente ordena cierta cantidad de libros. Discos y cuadernos; los libros tienen 20% de descuento y los disco 15%. Los datos que se tienen por cada tipo de articulo son; la cantidad pedida y el precio unitario.-Además, si se paga de contado un descuento de 6%

Elaborar un algoritmo que calcule e imprima el costo total de la orden, tanto para el pago de contado como para el caso de pago e crédito.

Proceso LibroDiscoCuaderno

Definir libros,cuadernos,discos,op,cos_uni,cantidad,pago,res Como Real;

Escribir 'Bienvenido, aqui pobra saber el costo de la orden en el pedido de libros,cuadernos y discos';

Escribir