top of page

UTILIZANDO SUB-PROCESO MAXIMO EN PSEINT

DIMENSIÓN vector(10);

                inicial=1;

                final=5;

                //leer el vector

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Escribir "v[",i,"]=";Leer vector(i);

                Fin Para

                //minimo

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Si vector(i)<vector(i+1) Entonces

                                               maxi=vector(i);               

                               Sino

                                               maxi=vector(i+1);

                               Fin Si

                               Escribir "el maximo es: ", maxi ;

                Fin Para

                Escribir "el maximo es: ",maxi;

Fin SubProceso

 

SubProceso mirarvector()

                DIMENSION vector(10);

                inicial=1;

                final=10;

                v=0

                Para i<-inicial Hasta final Con Paso 1 Hacer

                               v=v+3

                               escribir "v[",i ,"]=", vector(i);

                               Escribir (v)

                Fin Para

               

Fin SubProceso

 

SubProceso mínimo()

                DIMENSIÓN vector(10);

                inicial=1;

                final=5;

                //leer el vector

                Para i<-incial Hasta final Con Paso 1 Hacer

                                Escribir "v[",i,"]=";leer vector(i);

                Fin Para

                //minimo

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Si vector(i)<vector(i+1) Entonces

                                               mini=vector(i);                

                               Sino

                                               mini=vector(i+1);

                               Fin Si

                               Escribir "el minimo es: ", mini ;

                Fin Para

                escribir "el minimo es: ",mini;

Fin SubProceso

 

SubProceso promedio()

                DIMENSION vector(10)

                inicial=1;

                final=10;

                Para i<-incial Hasta final Con Paso 1 Hacer

                               escribir "ingrese V[",i,"]=";

                               //Leer vector(i);

                               Escribir "es:",vector(i); 

                Fin Para

                //promedio

                sumar=0

                Para i<-incial Hasta final Con Paso 1 Hacer

                               sumar=sumar+vector(i);

                               escribir "el resultado es: ",sumar;

                Fin Para

               

                prom=sumar/final;

                Escribir (prom);

Fin SubProceso

 

Proceso laurasadmaria

               

                definir maxi, mini,sumar,inicial,final como real;

                definir vector, i,v, opciones como entero;

                escribir "ingrese una opción";

                leer opciones ;

                escribir " 1- calcular promedio";

                escribir " 2- calcular mínimo";

                escribir " 3- calcular mirarvector";

                escribir " 4- calcular máximo";

                Segun opciones  Hacer

                                1:

                                               promedio()

                               2:

                                               minimo()

                               3:

                                               mirarvector()

                               4:

                                               maximo()

                               De Otro Modo:

                                               escribir " no es determinado";

                Fin Segun

               

finproceso         

DIMENSION vector(10);

                inicial=1;

                final=5;

                //leer el vector

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Escribir "v[",i,"]=";Leer vector(i);

                Fin Para

                //minimo

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Si vector(i)<vector(i+1) Entonces

                                               maxi=vector(i);               

                               Sino

                                               maxi=vector(i+1);

                               Fin Si

                               Escribir "el maximo es: ", maxi ;

                Fin Para

                Escribir "el máximo es: ",maxi;

Fin SubProceso

 

SubProceso mirarvector()

                DIMENSION vector(10);

                inicial=1;

                final=10;

                v=0

                Para i<-inicial Hasta final Con Paso 1 Hacer

                               v=v+3

                               escribir "v[",i ,"]=", vector(i);

                               Escribir (v)

                Fin Para

               

Fin SubProceso

 

SubProceso minimo()

                DIMENSION vector(10);

                inicial=1;

                final=5;

                //leer el vector

                Para i<-incial Hasta final Con Paso 1 Hacer

                                Escribir "v[",i,"]=";leer vector(i);

                Fin Para

                //minimo

                Para i<-incial Hasta final Con Paso 1 Hacer

                               Si vector(i)<vector(i+1) Entonces

                                               mini=vector(i);                

                               Sino

                                               mini=vector(i+1);

                               Fin Si

                               Escribir "el minimo es: ", mini ;

                Fin Para

                escribir "el minimo es: ",mini;

Fin SubProceso

 

SubProceso promedio()

                DIMENSION vector(10)

                inicial=1;

                final=10;

                Para i<-incial Hasta final Con Paso 1 Hacer

                               escribir "ingrese V[",i,"]=";

                               //Leer vector(i);

                               Escribir "es:",vector(i); 

                Fin Para

                //promedio

                sumar=0

                Para i<-incial Hasta final Con Paso 1 Hacer

                               sumar=sumar+vector(i);

                               escribir "el resultado es: ",sumar;

                Fin Para

               

                prom=sumar/final;

                Escribir (prom);

Fin SubProceso

 

Proceso laurasadmaria

               

                definir maxi, mini,sumar,inicial,final como real;

                definir vector, i,v, opciones como entero;

                escribir "ingrese una opción";

                leer opciones ;

                escribir " 1- calcular promedio";

                escribir " 2- calcular mínimo";

                escribir " 3- calcular mirarvector";

                escribir " 4- calcular máximo";

                Segun opciones  Hacer

                                1:

                                               promedio()

                               2:

                                               minimo()

                               3:

                                               mirarvector()

                               4:

                                               maximo()

                               De Otro Modo:

                                               escribir " no es determinado";

                Fin Según

               

fin proceso         

37538636-profesor-de-sexo-masculino-de-l

CAMPO MAGNETICO

OBJETIVOS:

 

  • Dar a conocer las propiedades del magnetismo, así como la forma en que se generan los campos magnéticos y su relación con los polos a través de la complementación del método científico para identificar su importancia en el desarrollo y bienestar de la humanidad.

  • Conocer los efectos del campo magnético sobre las cargas en movimiento.

  • Determinar la fórmula de la fuerza que ejerce un campo magnético sobre una corriente y el momento sobre una espira.

  • Obtener, aplicando la ley de Ampère, el campo magnético producido por una corriente rectilínea, un solenoide y un toroide.

  • Calcular el flujo de campo magnético a través de una superficie.

ALCANCES:

Investigación: ¿qué tanto alcance tiene el imán?

La organización europea Fusión for Energy (F4E), con sede en Barcelona, acaba de informar que ya está listo el imán más sofisticado del mundo. Formará parte de los equipos que se están instalando al sur de Francia en el ITER, la mayor máquina experimental que demostrará la viabilidad de la energía de fusión nuclear. Los responsables de este mega proyecto, en el que participa España, están fabricando poderosos imanes superconductores (conocidos como bobinas de campo toroidal) para confinar el plasma super caliente del reactor experimental, que se espera alcance una temperatura de 150 millones de grados centígrados.

Cada una de estas bobinas tiene una altura de 13 metros, una anchura de 9 metros y pesa aproximadamente 300 toneladas, tanto como un Boeing 747. Cuando sean propulsadas con 68.000 amperios, generarán un campo magnético que alcanzará 11,8 teslas, aproximadamente un millón de veces más poderoso que el campo magnético de la Tierra.

JUSTIFICACION:

El campo magnético también es importante ya que sin este la vida no podría existir ni desarrollarse en el planeta tierra. Migraciones de las aves guiadas por el campo magnético terrestre. Algunos animales pueden determinar las líneas de la ubicación geográfica de la tierra, gracias al campo magnético de la tierra desarrollaron este sentido de la orientación como las palomas mensajeras estas vuelan según un rumbo de la brújula de imán ,sin una orientación no es posible que se ubiquen dentro de la atmosfera terrestre. Para los seres humanos después de los primeros vuelos al espacio, los astronautas tuvieron serios problemas de salud, se habló del "mal del espacio" que fue causado por la falta del campo geomagnético natural. Desde entonces, la NASA incluye generadores de campo magnético para generar un campo magnético artificial en las cápsulas espaciales, no hubo problemas de salud nunca más.

Gracias a este campo magnético la vida se desarrolló de forma normal, sin el seguramente no habría vida en el planeta tierra.

MARCO TEORICO

Un campo magnético es una descripción matemática de la influencia magnética de las corrientes eléctricas y de los materiales magnéticos. El campo magnético en cualquier punto está especificado por dos valores, la dirección y la magnitud; de tal forma que es un campo vectorial. Específicamente, el campo magnético es un vector axial, como lo son los momentos mecánicos y los campos rotacionales. El campo magnético es más comúnmente definido en términos de la fuerza de Lorentz ejercida en cargas eléctricas.

El término se usa para dos campos distintos pero estrechamente relacionados, indicados por los símbolos B y H, donde, en el Sistema Internacional de Unidades, H se mide en unidades de amperios por metro y B se mide en teslas o newtons por metro por amperio. Los campos magnéticos se producen por cualquier carga eléctrica producida por los electrones en movimiento y el momento magnético intrínseco de las partículas elementales asociadas con una propiedad cuántica fundamental, su espín.

 MARCO PROCEDIMENTAL:

//campo magnetico1

SubProceso fuerza()

            Escribir "calculo de la fuerza sobre el cable";

            Escribir "ingrese la corriente sobre un cable";

            Leer il;

            inicial2=10;

            final2=100;

            Si il<>0 Entonces

                        Para b<-inicial2 Hasta final2 Con Paso 10 Hacer

                                   f=il*b;

                                   Escribir "la fuerza sobre el cable es",f, "cuando la corriente es ", il;

                        Fin Para

            Sino

                        Escribir "no se puede determinar"

            Fin Si

Fin SubProceso

 

//campo magnetico2

SubProceso fuerza2()

            Escribir "calculo de la fuerza magnética sobre una carga";

            Escribir "ingrese la carga";

            Leer q;

            Escribir "ingrese valor para campo magnético";

            Leer b;

            Escribir "ingrese valor para angulo";

            Leer ang;

            inicial1=15;

            final1=150;

            Si q<>0 Entonces

                        Para v<-inicial1 Hasta final1 Con Paso 12 Hacer

                                   fm=q*v*b*sen(ang);

                                   Escribir "la fuerza magnetica es ", fm, "cuando la carga es ", q;

                        Fin Para

            Sino

                        Escribir "no se puede determinar"

            Fin Si

Fin SubProceso

 

//campo magnetico3

            SubProceso campomagnetico()

                        Escribir "calculo del campo magnético";

                        Escribir "ingresa la permeabilidad magnética";

                        Leer u;

                        Escribir "ingrese el numero de espiras";

                        Leer n;

                        Escribir "ingrese la corriente";

                        Leer i;

                        inicial=52;

                        final=220;

                        Si i<>n Entonces

                                   Para l<-inicial Hasta final Con Paso 22 Hacer

                                               b=u*n*i/l;

                                               Escribir "el campo magnetico es ", b, "cuando i es", i;

                                   Fin Para

                        Sino

                                   Escribir "no es determinado"

                        Fin Si

            FinSubProceso

           

//campo magnetico4

            SubProceso intensidad()

                        Escribir "calculo de la intensidad del campo magnetico";

                        Escribir "ingresa el numero de vueltas de una bobina";

                        Leer nv;

                        Escribir "ingrese la intensidad de la corriente";

                        Leer i;

                        inicial3=80;

                        final3=95;

                        Si i<>nv Entonces

                                   Para l<-inicial3 Hasta final3 Con Paso 0.1 Hacer

                                               h=nv*i/l;

                                               Escribir "la intensidad del campo magnetico es ",h, "cuando la impedancia es ", i;

                                   Fin Para

                        Sino

                                   Escribir "no es determinado"

                        Fin Si

            FinSubProceso

           

           

           

            Proceso parametro1

           

            Definir f,il,b Como Real;

          definir fm,v,q,ang como real;

            definir i,u,n,l como real;

            definir h,nv como real;

            definir inicial3,final3 como real;

            definir inicial2,final2 como real;

            definir inicial1,final1 como real;

            definir inicial,final,opcion Como Entero;

            escribir " menu";

            escribir " 1-calculo de la intensidad del campo magnético";

            escribir " 2-calculo del campo magnético";

            escribir " 3-fuerza magnética sobre una carga";

            escribir " 4-calculo de la fuerza sobre el cable";

            escribir " elija una opción";

            leer opción;

            Según opción Hacer

                        1:

                                   intensidad()

                        2:

                                   campo magnetico()

                        3:

                                   fuerza2()

                        4:

                                   fuerza()

                        De Otro Modo:

                                   escribir "no valido";

                        Fin Según

FinProceso

CONCLUSION

Como conclusión a todo esto que hemos estudiado podemos decir en resumen que, el magnetismo es un fenómeno físico por el que los materiales ejercen fuerzas de atracción o repulsión sobre otros materiales. El magnetismo se utiliza para el diseño de todos los motores y generadores, y electroimanes. El magnetismo de los materiales es el resultado del movimiento de los electrones dentro de sus átomos. Los átomos en el material magnético se orientan en una sola dirección y en los no magnéticos se orientan al azar.

BIBLIOGRAFIA

VIDEO DE CAMPO MAGNETICO

bottom of page