% Analisis Sismico por Max Priewer Z.


h=input('Ingrese Altura Entrepisos en [cm] ');
I=1; % Coeficiente de Importancia
P=1000; % Peso Sismico en kgf/m2
C=1; % Coeficiente Sismico segun Nch433
Sy=C*I*P;
Sx=Sy;
cml=zeros(1,2); % (centro de masa losa) matriz con ceros de una fila y dos colmunas
cml(1,1)=input('Igrese Coordenada X del Centro de Gravedad del Nivel (Losa) en [cm]  ');
cml(1,2)=input('Igrese Coordenada Y del Centro de Gravedad del Nivel (Losa) en [cm]  ');


NumejesX=input('Ingrese el numero de ejes en el sentido X  ');
NumejesY=input('Ingrese el numero de ejes en el sentido Y  ');

for i=1:NumejesX
    b=input('Para el Sentido X, ingrese el numero de muros del eje ')

    for j=1:b
        e=input('Ingrese el espesor del muro en [cm]  ');
        l=input('Ingrese el largo del muro en [cm]  ');
        m=input('Ingrese el Material del Muro. "1" para Hormigon, "2" para Albañileria   ' );
    end
end