REDES SOCIALES

 Las redes sociales son estructuras sociales compuestas de grupos de personas, las cuales están conectadas por uno o varios tipos de relaciones, tales como amistad, parentesco, intereses comunes o que comparten conocimientos.
Las redes sociales en Internet han ganado su lugar de una manera vertiginosa convirtiéndose en promisorios negocios para empresas, artistas, marcas, freelance y sobretodo en lugares para encuentros humanos.
Para comprender un poco este fenómeno en crecimiento presuroso cabe citar en principio alguna definición básica que nos permita comprender que es una red social, cómo funcionan en Internet y algunas nociones sobre su historia.

LOS RIESGOS DE LAS REDES SOCIALES.
Los riesgos que obtenemos al adquirir una red social son varias, en la cual muchas persona tienen informacion personal, documentos importantes, etc.
pero los riesgos que corren son: 
1.  que otras personas se metan a una red social  que no es la de ellos.
2. que roben informacion confidencial.
3. que miren informacion personal.
4. que utilizen una red que no es de ellos para buscar aser cosas indevidas.
5. que obtengan informacion.
6. que se hagan pasar por otras personas. e.t.c.


Hoy en dia, hay muchas redes sociales en las cuales podemos mencionar las siguientes:
1. TWITER
2. FECEBOOK
3. MESSENGER
4. MYSPACE
5. HI5
6. GMAIL
7. FRIENDSTER
Entre otras.
pero para muchas personas las mas utilizadas son, (FACEBOOK, MESSENGER,TWITER,MYSPACE)
Y otras mas.

VENTAJAS Y DESVENTAJAS DE LAS REDES SOCIALES.

1. VENTAJAS

• Útiles para la búsqueda de personal.
• Son utilizadas en forma de Intranet.
• Permiten realizar foros y conferencias online
• Han modificado la manera de hacer marketing, generando una mayor segmentación de medios e interactividad con sus consumidores.
• El consumidor puede interactuar y conocer las características de los productos, además de promociones, noticias de la empresa, lanzamiento de nuevos productos, etc.
• En tiempos de crisis es una excelente forma de hacer mercadotecnia y publicidad a bajos costos.
• Perfecta fuente de información para saber lo que quiere el cliente y en un futuro retomar esta información para los planes estratégicos de la empresa.

 DESVENTAJAS

• Los malos comentarios generados en la red pueden dar mala imagen al negocio.
• Absorben el tiempo de los trabajadores y los agobian con el uso de tantas tecnologías.
• Los empleados pueden abusar de estas plataformas o usarlas con fines no profesionales.
• Los mensajes no pueden ser muy extensos, y se tienen que abreviar demasiado.
  
• El ruido que se genera dentro de las redes puede ser excesivo por lo que es muy difícil mantener a un público fiel.
• Algunos usuarios se dedican a hacer SPAM.
   
  TIPOS DE REDES SOCIALES
  Si hay un fenómeno que ha llamado la atención en Internet en los últimos tiempos, y que ya comienza a dar beneficios económicos a sus creadores, esta es la aparición de las denominadas redes sociales, como por ejemplo Facebook o Tuenti. Las razones para que este tipo de webs triunfen son sencillas: permiten establecer contactos entre personas de diferentes puntos y que tengan unas aficiones o formas de pensar similares.
  El numero de redes que existen en la actualidad es muy elevado, pero lo realmente interesante es que, debido a la pujanza de estas páginas, han aparecido algunas muy especializadas: relaciones laborales, comentarios sobre películas o actuaciones, cuidado de mascotas... Hay de todo. Por lo tanto, es un buen momento para realizar un pequeño recopilatorio de las más Importantes a nivel general, y las que son más interesantes debido a su enfoque.
  

  ---

  
  

ELEMENTOS PRINCIPALES DE WORD 2007

ejemplos de FOR, PASCAL

For c := 1 to 5 do

      Begin

            Write (`aa´);

            Write (`BB´)

      End;

Al ejecutarse, visualiza:

AaBBaaBBaaBBaaBBaaBB

For Caracter := `A´ to `Z´ do

       WriteLn (Caracter);

3. 4. 1. 1 Decremento del contador FOR (Downto)

El contador del ciclo se puede decrementar de uno en uno en lugar de incrementar. La sintaxis es la siguiente:

For variable := valor inicial downto valor final do

       Sentencia;          

Ejemplos:

For C :=  5 downto 1 do

      Begin

            Write (`C´);

            Writeln

      End;

Lo anterior produce la siguiente salida:

5

4

3

2

1

También podemos encontrar ciclos FOR anidados:

For m := 1 to 10 do

   begin

      For n := 10 downto 2 do

            WriteLn (m,n)

   end;

3.4.2 La sentencia REPEAT

Es una variante de la sentencia while. La sentencia REPEAT especifica un ciclo condicional que se repite hasta que la condición se hace verdadera.

El diagrama de flujo se representa de la siguiente manera:

                          

El seudocódigo se representa así:

Repetir

       Sentencias

Hasta_que condición           

Sintaxis:

Repeat

      Begin

            Sentencia 1;

            Sentencia 2;

            ...

            ...

            ...

            Sentencia n;

      End;

Until expresion lógica

Ejemplo:

(* El siguiente programa imprime las secuencias de caracteres hasta que se presione cualquier tecla *)

 Uses   wincrt;

Var      m : char;

            n : integer;

Begin

      Repeat

            Begin

                Write ('a e i o u');

                Write ('1 2 3 4 5');

            End;

      Until keypressed

End.

ejemplos de WHITE-DO.

program prog5;

uses crt;

var

x:integer;

begin

clrscr;

x:=1;

while x <= 5 do

begin

gotoxy(10,4+x);write(x,' pato');

x:=x+1;

end;

readln;

end.

OTRO EJEMPLO.

ejemplos:

Program Ej_While;Uses Crt;
 {El siguiente programa captura una cadena,
 hasta que se presione la tecla Esc(escape),
 cuyo ordinal es el #27.}
Const
  Esc = #27;Var
  nombre : string[30];
  tecla  : char;
  cont   : word;begin
  ClrScr;
  cont:=1;
  While (tecla<>Esc) do
    begin
      Write(cont,' Nombre : ');
      ReadLn(nombre);
      inc(cont);
      tecla:=ReadKey
    end
end.

otro ejemplo de repeat-until

program EJE13121;

uses Crt;

var
   Seguir : Char;
   Acumulador, Numero : Integer;

   { En Acumulador se va a guardar la suma de
     los numeros introducidos por el usuario. }

begin
   ClrScr;

   Acumulador := 0;
   repeat
      WriteLn;
      Write( '   Introduzca un numero entero: ' );
      ReadLn( Numero );

      Acumulador := Acumulador + Numero;

      WriteLn;
      Write( '   Desea introducir otro numero (s/n)?: ' );
      ReadLn( Seguir );
   until Seguir = 'n';

   { Mientras que el usuario desee introducir
     mas numeros, el bucle iterara. }

   WriteLn;
   Write( '   La suma de los numeros introducidos es: ', Acumulador );
end.

ejemplo de pascal.(repeat until)

program EJE13101;

uses Crt;

var Contador : Integer;

begin
   ClrScr;
   GotoXY( 4, 2 );

   Contador := 1; { Inicializacion del contador }
   repeat
      Write( Contador, ' ' );     { Salida }
      Contador := Contador + 1;   { Incremento }
   until Contador > 10;           { Condicion }
end.

CICLOS DE PASCAL

For –Do

Este ciclo ejecuta una serie de instrucciones incrementando o decrementando una variable hasta un tope determinado.

SINTAXIS GENERAL

For Variable:=Inicio To Tope Do

Begin

{Bloque De Instrucciones}

End;

Forma Incremental

For Variable:=Valor_Menor To Valor_Mayor Do

Begin

{Bloque De Instrucciones}

End;

Forma Decremental

 For Variable:=Valor_Menor To Valor_Mayor Do

Begin

{Bloque De Instrucciones}

End;

La variable controladora del ciclo es generalmente de tipo INTEGER, pero tambien se puede en algunas ocasiones declarar de tipo carácter asi:

For Letras:=’a’ to ‘z’ do

Begin

{En este ciclo se recorre el alfabeto de la ‘a’ a la ‘z’ de letra en letra}

End;

Similar a otras instrucciones, si el ciclo FOR – DO tiene una sola instrucción no requiere BEGIN – END, en caso contrario si!, una delas desventajas de este ciclo es que hasta que no se hallan ejecutado el número de instrucciones determinado no se detiene, si alguna vez tienes un problemilla de este tipo deberas recurrir a alguno de los otros dos : REPEAT – UNTIL o WHILE – DO.

Repeat-Until

EL CICLO "REPITA" (Como cariñosamente se le llama en la jerga de los programadores) actua de manera similar al ciclo WHILE – DO, con la pequeña diferencia de que en este se ejecutan las instrucciones y despues se evalua la condición.

Este no necesita BEGIN ni END, aunque tampoco dice nada si se los colocas.

SINTAXIS

Repeat

           {Bloque de instrucciones}

Until (Expresión_a_evaluar)

Program ciclo_repeat_until;

Uses crt;

Const

N=5;

Type

Vector = Array[1..N] of Integer;

Var

Vector_numeros : Vector;

Suma : Integer;

Promedio : Real;

I : Byte;

Begin

Clrscr;
Textcolor(LightMagenta);
Writeln(‘Lectura con ciclo REPEAT ‘);
Textcolor(White);
i:=0;{Notese que primero se debe inicializar la variable}
Repeat

I:=i+1;{La variable controladora del ciclo se incrementa en un valor determinado, en este caso hemos escogido 1, pero podría ser otro}
Write(‘Digite número :’);
Readln(Vector_numeros[i]);
Suma:= Suma + Vector_numeros[i];

Until (i>=N);
Ppromedio:=Suma/N;
Writeln(‘La Suma es = ‘,SUMA);
Writeln(‘El promedio es = ‘,PROMEDIO:0:2);
Readln;

End.

CICLO WHILE – DO

Este ejecuta una serie de instrucciones un número no determinado de veces hasta que se cumpla con una condición establecida , aunque tambien se puede hacer que trabaje de manera similar al ciclo FOR.

Una de las ventajas del ciclo WHILE es que puede evaluar variables de muchos mas tipos que el ciclo FOR(Recuerda que en este solo se pueden usar variables de tipo CARÁCTER y ENTERAS) entre ellas destacamos las de tipo STRING, BOOLEAN, INTEGER, REAL, ARREGLO.

El ciclo WHILE evalua y despues ejecuta instruccciones

Si lleva mas de una instrcción necesita BEGIN - END

SINTAXIS

While (Expresión_A_Evaluar) Do

Begin

       {Bloque De Instrucciones}

End;

Program Ciclo_While;

Uses Crt;

Const

    N=5;

Type

    Vector = Array[1..N] Of Integer;

Var

Vector_Numeros : Vector;
Suma : Integer;
Promedio : Real;
I : Byte;

Begin

Clrscr;
Textcolor(Lightmagenta);
Writeln(‘Lectura Con Ciclo While ‘);
Textcolor(White);
I:=0;{Notese Que Primero Se Debe Inicializar La Variable}
While (I<=N) Do
Begin

I:=I+1;{La Variable Controladora Del Ciclo Se Incrementa En Un Valor Determinado, En Este Caso Hemos Escogido 1, Pero Podría Ser Otro}
            Write(‘ Digite Número :’);

Readln(Vector_Numeros[I]);
Suma:= Suma +Vector_Numeros[I];

End;
Ppromedio:=Suma/N;
Writeln(‘La Suma Es = ‘,Suma);
Writeln(‘El Promedio Es ‘,Promedio:0:2);
Readln;

End.