Comparte
Ver el tema anteriorIr abajoVer el tema siguiente
avatar
-Fundador-
-Fundador-
Post900
Puntos GS2466
Reputación27
Registrado 13/06/2014
Ver perfil de usuariohttp://portalgs.foro-activo.es

Programar En turbo Pascal

el Jue Mar 05, 2015 1:13 pm
Hola saludos. No Todos saben Pero Turbo Pascal es un lenguage de programacion baisico si queremos empezar como programdores les recomiendo que intenten programar con turbo pascal para avanzar a un siquiente nivel ya q es muy usado hasta en las univercidades para sus primeros semestres..

Bueno empezemos. Mayormente son algoritmos que debemos hacer, Secuenciales, Condicional, ciclo repetitivo.

Una deficion corta para q tengamos de q se trata cada una

Secuencial: Es llevar la secuencia 1 a 1 hasta al final del programa es decir intruccion por intruccion.

Condiconal: Esta es la que nos permite programar con condiciones por ejemplo si yo quiero que el programa me diga si es venezolano o extranjero y que me imprima un mensaje dependiendo de cual sea bueno hay ya tenemos una condicion..

Ciclo repetitivo: Este nos permite realizar algoritmos que nos lea varios datos de entrada, y de salida, por ejemplo un programa que tenga q leer los datos de 50 empleados y q el programa tiene que decir cuantos son hombre y cuantos son mujeres..

Empecemos con la estructura que debe tener todo programa en pascal.
Cita: escribió:PROGRAM NOMBRE_DEL_PROGRAMA; " SIN ESPACIOS"
USES"NOMBRE DE LAS UNIDADES A ENLAZAR EN EL PROGRAMA"
CRT " UNIDAD ESTANDAR DE TURBO PASCAL"

COST "COSTANTES DEL PROGRAMA"

VAR "VARIABLES DEL PROGRAMA"

BEGIN "INICIO DEL PROGRAMA"


END. "FINAL DEL PROGRAMA

Un ejemplo con la estructura.

Cita: escribió:Program Suma;
uses
crt

var

n1;integer;
n2;integer;
n3;integer;

begin
clrscr;

write('introdusca el primer valor para la sumatoria');
read(n1);
write('introdusca el segundo valor para la sumatoria');
read(n2);

n3:= n1+n2;

write( la sumatoria es:',n3);

readkey
end.

Ejemplo en un condicional

Cita: escribió:Program Suma;
uses
crt

var

n1;integer;
n2;integer;

begin
clrscr;

write('introdusca el primer valor');
read(n1);
write('introdusca el segundo');
read(n2);

begin
if (n1>n2) then
write('el primer valor es mayor');
else
write('el segundo valor es mayor');
end;

readkey
end.

Descargar turbo pascal:
[Tienes que estar registrado y conectado para ver este vínculo]

Una Pequeña guia basica para que entiendan en que consiste este lenguaje cualquier duda la respondere.

saludos...

Creditos: YeiserGS






Bienvenido a PortalGS

Recuerda Leer Las Reglas

[Tienes que estar registrado y conectado para ver este vínculo]
Gana Dinero Por Internet
[Tienes que estar registrado y conectado para ver este vínculo]
Ver el tema anteriorVolver arribaVer el tema siguiente
Permisos de este foro:
No puedes responder a temas en este foro.