Integrantes:

De la Palma Michel Alexis.

Diaz Martínez Omar Benito.
Olivares Vargas José Ángel.
Pérez Alemán Howard Eduardo.

Dosificación y
presupuestación de
losas macizas
¿Qué son las losas y cual es
su función?

Es un elemento horizontal de
concreto armado o
prefabricado indispensables
en una construcción, la cual
sirve como separación entre
los niveles del inmueble.
Losa maciza o de
concreto
Existen distintos tipos de
losas, la elección de una
dependerá del uso y de los
objetivos en la construcción
del inmueble. Para este caso
nos enfocaremos en la losa
maciza o de concreto.
 Entre los elemento que conforman una losa se
encuentran las varillas de acero y concreto,
enfocándonos en la composición de este ultimo
como lo es
• Grava
• Arena
Elementos de • Agua

una losa maciza

 La cantidad de cada uno varía
dependiendo de la resistencia que se desee
emplear, y el presupuesto disponible para la
construcción de la losa.
Calculo o dosificación de materiales
Es muy importante la dosificación de los materiales a utilizar para el armado de una losa, puesto que un error pondría
en peligro el proyecto y, por ende, la seguridad de los ocupantes es por ello que nuestro proyecto se centrará en la
dosificación y presupuestación de losas macizas.
 Inicio

REAL :: LONG, ANCHO, ALTURA, VOLUMEN, CEMENTO, ARENA, GRAVA, AGUA, BULTOS,
C_BULTO, C_ARENA, C_GRAVA, C_AGUA
INTEGER (kind=8):: Tipo_resistencia, Resistencia, Desperdicio
CHARACTER :: Valor_resistencia, otro_calculo

LONG=0
ANCHO=0
ALTURA=0
BULTO = CEMENTO/50

C_BULTO = 188.00
C_ARENA = 449.61
C_GRAVA = 505.99
C_AGUA = 0.1
100

INGRESA: LONG, IF
ANCHO, ALTURA (Tipo_resi
stencia == 1
1) THEN

si Dato
IF ( LONG, ANCHO,
ALTURA <= 0 ) THEN invalido IF
(Tipo_resi
stencia == 2
2) THEN
Dato
no
invalido

VOLUMEN= LONG*ANCHO*ALTURA Ingrese el tipo de Resistencia

si IF
(Tipo_resi
1)PSI (Libras por Pulgada
Cuadrada) stencia == 3
INGRESA EL VALOR IF ( desperdicio 2)MPa (Megapascal) 3) THEN
no
DE DESPERDICIO A <= 0 ) THEN 3) Kg/cm2“
CONSIDERAR
read*, desperdicio read*, Tipo_resistencia
 print*, "La medida de resistencia se
Dependiendo de la resistencia,
realizará en PSI (Libras por Pulgada
1 Cuadrada)"
viene la medida por metro
cubico tanto de CEMENTO,
print*, "" ARENA, GRAVA, AGUA
print*, "Elige el valor de PSI"
print*, "a) 4000 PSI"
print*, "b) 3555 PSI" Cada una se multiplica por
Volumen
print*, "c) 3224 PSI" print*, "---------------C O S T O S -------------” Costo Total :
print*, "d) 3000 PSI" BULTOS*C_BULTO+ARENA*C_AR
print*, "e) 2850 PSI" Imprime resultados print*, "COSTO de Material: $", ENA+GRAVA*C_GRAVA+AGUA*C
print*, "f) 2700 PSI" MATERIAL*C_MATERIAL, "MXN" _AGUA
print*, "g) 2400 PSI"
print*, "h) 2275 PSI" MATERIAL+ ((desperdicio*MATERIAL)/100)
print*, "i) 2000 PSI"
print*, "j) 1700 PSI" print*, "C O S T O S CON DESPERDICIO”
print*, "k) 1560 PSI" Imprime resultados
print*, "l) 1420 PSI" con desperdicio print*, "COSTO de MATERIAL: $",
read*, Valor_resistencia (MATERIAL+((desperdicio*MATERIAL)/1
00))*C_BULTO, "MXN"

4
 print*, "La medida de resistencia se
realizará en MPa (Megapascal)"
print*, "" Dependiendo de la resistencia,
print*, "Elige el valor de MPa"
2 print*, "a) 27 MPa"
viene la medida por metro
cubico tanto de CEMENTO,
print*, "b) 24 Mpa" ARENA, GRAVA, AGUA
print*, "c) 22 MPa"
print*, "d) 20 MPa" Cada una se multiplica por
print*, "e) 19 MPa" Volumen
print*, "f) 18 MPa" print*, "---------------C O S T O S -------------” Costo Total :
print*, "g) 16 MPa" BULTOS*C_BULTO+ARENA*C_AR
Imprime resultados print*, "COSTO de Material: $", ENA+GRAVA*C_GRAVA+AGUA*C
print*, "h) 15 MPa"
MATERIAL*C_MATERIAL, "MXN" _AGUA
print*, "i) 14 MPa"
print*, "j) 12 MPa"
MATERIAL+ ((desperdicio*MATERIAL)/100)
print*, "k) 11 MPa"
print*, "l) 10 MPa"
read*, Valor_resistencia Imprime resultados print*, "C O S T O S CON DESPERDICIO”
con desperdicio
print*, "COSTO de MATERIAL: $",
(MATERIAL+((desperdicio*MATERIAL)/1
00))*C_BULTO, "MXN"

4
 print*, "La medida de resistencia
se realizará en Kg/cm2 (Kilogramo
por Centimetro Cuadrado"
print*, ""
3 print*, "Elige el valor en
Dependiendo de la resistencia,
viene la medida por metro
Kg/cm2" cubico tanto de CEMENTO,
print*, "a) 280 Kg/cm2" ARENA, GRAVA, AGUA
print*, "b) 240 Kg/cm2"
print*, "c) 226 Kg/cm2" Cada una se multiplica por
print*, "d) 210 Kg/cm2" Volumen
print*, "e) 200 Kg/cm2" print*, "---------------C O S T O S -------------”
Costo Total :
print*, "f) 189 Kg/cm2" BULTOS*C_BULTO+ARENA*C_AR
Imprime resultados print*, "COSTO de Material: $", ENA+GRAVA*C_GRAVA+AGUA*C
print*, "g) 168 Kg/cm2"
MATERIAL*C_MATERIAL, "MXN" _AGUA
print*, "h) 159 Kg/cm2"
print*, "i) 140 Kg/cm2"
MATERIAL+ ((desperdicio*MATERIAL)/100)
print*, "j) 119 Kg/cm2"
print*, "k) 109 Kg/cm2"
print*, "l) 99 Kg/cm2" Imprime resultados print*, "C O S T O S CON DESPERDICIO”
read*, Valor_resistencia con desperdicio
print*, "COSTO de MATERIAL: $",
(MATERIAL+((desperdicio*MATERIAL)/1
00))*C_BULTO, "MXN"

4
 4

print*, "--------Costos consultados al año 2021, conforme

el promedio de costos nacional segun la
PROFECO--------"
print*, "--Bulto de Cemento= $188.00 MXN--"
print*, "--Metro cubico de Arena= $449.61 MXN--"
print*, "--Metro cubico de Grav = $505.99 MXN--"
print*, "--Litro de Agua = $0.1 MXN--"

Adiós

n
read*,

print*, "¿Desea realizar otro calculo

s/n?" IF (otro_calculo == "s") s
read*, otro_calculo 100
THEN
Entre las metas para este proyecto nos centramos
en:
a) Ahorrar las cantidades de materiales a
ocupar
b) Tener el costo unitario total
Para asi ahorrar tiempos, agilizar el proceso de
cálculos y estimaciones en las obras,
convirtiendo este paso en algo menos complejo y
más preciso para todos los interesados en el
ámbito.
 En la elaboración del programa requerimos
evidenciar el comportamiento del algoritmo
planteado para esto nos apoyaremos con de
fórmulas y medidas
1. L 40m. A 20m E. 15M
Pruebas de 2. V= L×A×= 120 m^3
escritorio 3. Kg/cm^2
4. 210 equivalente a: cm 320k ar. 52m^2 gr.
9m^3 ag170L
5. Mt = (V) (MA)
 Mt ar = (120) (0.52 m^3) = 62.4 m^3

Mt cm = (120) (320) = 38.400 kg

Para
calcular el Mt gr = (120) (. 9) = 108 m^3 equivalente a
5400 botes
número de Mt ag = (120) (170) = 20,400 L = a 1,020
botes botes de 20 l
necesarios. Ahora los 38.400 kg /50 kg = 768 botes de 50
kg
Después para la dosificación planteamos los
componentes, sus equivalencias y costos.
Costos
Arena $449/m^3 cemento $182 grava $505/m^3 y agua por pipa $100/m^3.
6. Por botes la arena y grava x50
Agua se divide entre 20
Kg en bultos de cemento /50
7. Se le pregunta al usuario si requiere equivalencias y si requiere costos
8. En caso que si para el costo unitario se obtiene Ca=(ct) (p)
Ca ar = ($449/m^3) (62.4)=$28,017.6
Ca cm = =$182) (768) = $139,776
Ca gr = ($505 m^3) (708M^3) = $357,540
Ca ag = (100/m^) (20. 4 m^3) = $2,040
Ct= E c a
Y se obtuvo ct = ca ar + ca cm + ca gr + ca + gr + ca ag = $527,373.6
 CONTACTOS
• De la Palma Michel Alexis

• Diaz Martínez Omar Benito

• Olivares Vargas José Ángel

• Pérez Alemán Howard Eduardo