Que tal profe!
Aquí le pongo las imagenes de la investigación de bases de datos en excel, las puse así de grandes para que pueda leer bien lo que escribí...
Pensar en términos de objetos es muy parecido a cómo lo haríamos en la vida real. Por ejemplo vamos a pensar en un coche para tratar de modelizarlo en un esquema de POO. Diríamos que el coche es el elemento principal que tiene una serie de características, como podrían ser el color, el modelo o la marca. Además tiene una serie de funcionalidades asociadas, como pueden ser ponerse en marcha, parar o aparcar.Ejemplo.
Escribir los N primeros números naturales, donde N es un valor
introducido por el usuario.
Program escribeenteros;
Var
N,contador: integer;
Begin
Write ('Introduzca numero maximo de enteros: ');
Readln (N);
Contador:=1;
While contador<=N do
Begin
Write (contador:5);
Contador:=contador+1;
End;
Writeln;
Writeln ('Fin de programa. Contador = ',contador);
End.
Escribir un programa en Pascal que realice un bucle con While y muestre
en pantalla del 1 al 10.
PROGRAM EJER42;
USES CRT;
VAR x:INTEGER;
BEGIN
x:=0;
ClrScr;
WHILE X <= 10 DO
BEGIN
WRITELN (x);
x:=x+1;
END;
END.
program prog6;
uses crt;
var
x:integer;
begin
clrscr;
x:=1;
REPEAT
BEGIN
gotoxy(10,4+x);
write(x,' CONEJITO BLANCO HIMALAYA');
x:=x+1;
END
UNTIL x = 5;
readln;
end.Program escribeenteros;
Var
N,contador:integer;
Begin
Write ('Introduzca número máximo de enteros: ');
Readin (N);
Contador:= O;
Repeat
Contador:=contador+1;
Write (contador:5)
Until contador = N;
Writeln ('Fin de programa. Contador = ',contador)
End.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 | {-Victor De la Rocha} {-Algoritmia@groups.msn.com} {-www.myalgorithm.com} uses crt;var numero,limite,contador:integer; begin ClrScr; Write('Numero: ');Readln(numero); limite:=numero; numero:=1; for contador:=1 to limite do begin numero:=numero*contador; end; write('Factorial: ',numero); ReadKey; end. |
|
|
while (condicion) do
instruccion;
while (condicion) do
begin
instrucciones;
end;_________________________________________________________________________________For El ciclo for realiza la(s) instruccion(es) deseada(s) durante un numero de vueltas predeterminadas. Este numero de vueltas no podra ser modificado NUNCA dentro del bucle, por lo que debemos tener cuidado en no tocar la variable indice (la que controla el numero de vueltas). Un ejemplo:Y se mostraria por pantalla:program pruebaFor; CONST N = 10; { numero de vueltas que dara el bucle} VAR i: integer; { variable que contara el numero de vueltas que llevamos} BEGIN for i:=1 to N do writeln(i); END.En caso de que tengamos que ejecutar mas instrucciones dentro del bucle, escribiriamos:1 2 3 4 5 6 7 8 9 10Un ejemplo de esto:for (contador) do BEGIN instrucciones; END;Y en pantalla se imprimiria:program pruebaForDos; CONST N=10; VAR i,j : integer; {Una nueva manera de declarar las variables. En caso de tener varias del mismo tipo,podemos separarlas por ","} BEGIN j:=0; for i:=1 to N do begin writeln(i); j:=j+3; {Con esta instruccion, a la variable j la sumamos durante N veces 3} end; write('j = ',j); {Cuando vamos a escribir varias cosas seguidas, podemos enviar la instruccion de esta manera} END.En los ciclos For, podemos seguir dos tipos de direccion. Ascendente (de 1 hasta N) o descendente (de N hasta 1). Esto lo deberemos indicar en el contador del siguiente modo (usaremos el ejemplo anterior): Ascendente1 2 3 4 5 6 7 8 9 10 j = 30Descendentefor i:=1 TO N do ...for i:=N DOWNTO 1 do__________________________________________________________________________________RepeatEl bucle Repeat realiza una serie de instrucciones y, una vez hechas, comprueba una condicion. En caso de cumplirse, no volvera a repetir dichas instrucciones, y en caso contrario las ejecutara. Su estructura es:repeat instruccion(es); until (condicion);__________________________________________________________________________________Observese que los 3 ciclos, bien implementados, son equivalentes entre si.Hay que tener especial cuidado en el ciclo que se desea usar: · Si se desea hacer un numero de vueltas FIJO, podemos usar cualquiera de los 3. · Si las vueltas dependen de una condicion que se modifica dentro del bucle, solo podemos usar los ciclos WHILE y REPEAT. · Si queremos comprobar una condicion antes de realizar ciertas instrucciones, debemos usar el WHILE.
El usuario puede utilizar las dos pantallas de varias maneras diferentes. En el modo ‘SimulTask’ en las dos pantallas se ejecutan dos de las siete aplicaciones básicas del teléfono, incluidas las de mensajes, correo electrónico, navegación por Internet, marcación telefónica, galería de imágenes, agenda de contactos y VueQue.
La 1 era generación abarca desde el año 1945 hasta el año 1958, en esta época la tecnología se basaba en bulbos o tubos de vació algunas de sus características por las que se distingue son: