PROGRAM MULTIPLO;
USES CRT;
VAR x,y,z,s:INTEGER;
begin
ClrScr;
write('ESCRIBA EL NUMERO DE LIMITE INFERIOR: ');
readln(y);
writeln(' ');
write('ESCRIBA EL NUMERO DE LIMITE SUPERIOR: ');
readln(s);
writeln(' ');
write('ESCRIBA EL NUMERO MULTIPLO: ');
readln(z);
writeln(' ');
FOR x:=y to s do
BEGIN
if x mod z=0 then
writeLN(x);
writeln(' ');
delay(10);
end;
readln
end.
miércoles, 13 de julio de 2011
TABLA DE MULTIPLICAR DEL 1 AL 10 DE UN NUMERO CUALQUIERA (.pas).
PROGRAM TABLA_DE_MULTIPLICAR;
USES CRT;
VAR x,y:INTEGER;
begin
ClrScr;
write('ESCRIBA UN NUMERO: ');
readln(y);
x:=0;
while x<10 do
begin
x:=x+1;
writeln(y,' x ',x,' = ',y*x);
end;
readln
end.
lunes, 4 de julio de 2011
martes, 21 de junio de 2011
Programacion (21-06-11). Estructuras de Datos.
Estructuras de Datos.
- Estructura de datos (arrays).
- Array (Vectores o Matriz).
- Clasificación Arrays
lunes, 20 de junio de 2011
PROGRAMACION
Favor distribuir dicha información a todos los integrantes del salón. Gracias!!
El dia martes habra clase en el salon y alli entregare el Trabajo Final y se daran las pautas a seguir.
Saludos!!
Nos vemos el martes
sábado, 18 de junio de 2011
miércoles, 8 de junio de 2011
lunes, 6 de junio de 2011
Laboratorio de Programacion.
domingo, 5 de junio de 2011
martes, 31 de mayo de 2011
sábado, 28 de mayo de 2011
sábado, 14 de mayo de 2011
viernes, 13 de mayo de 2011
lunes, 9 de mayo de 2011
lunes, 2 de mayo de 2011
jueves, 14 de abril de 2011
miércoles, 13 de abril de 2011
martes, 5 de abril de 2011
miércoles, 30 de marzo de 2011
domingo, 27 de marzo de 2011
sábado, 26 de marzo de 2011
sábado, 19 de marzo de 2011
Suscribirse a:
Comentarios (Atom)










