Autor |
Mensaje |
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
que tal, el jueves pasado tuve la primera clase de pascal en algoritmos y programacion 1, y vimos un ejercicio en el que te dan dos numeros reales y quiero calcular su suma, y yo lo escribi asi:
program suma;
uses (dos,crt);
var (a,b,c:real);
begin
write ln ('ingrese_el_primer_numero');
read ln (a);
write ln ('ingrese_el_segundo_numero');
read ln (b);
c:=a+b;
write ln ('el_resultadode',a,'+',b,'=',c);
read ln
end.
pero cuando le doy compile me salta un error, alguien me podria correguir los errores del ejercicio. Yo me descargue el free pascal 2.2.2 win 32.
Muchas gracias.
|
|
|
|
|
|
|
|
|
antrax
Nivel 8
Edad: 115
Registrado: 01 Sep 2007
Mensajes: 613
Ubicación: Olivos y Wanda Misiones 2 meses al año
Carrera: Informática y Sistemas
|
|
bueno este compila tenes q poner los readln y writeln todo junto y te faltaron alguna ";" al final de cada linea, saludos
Cita:
|
program suma;
uses dos,crt;
var a,b,c:real;
begin
writeln('ingrese el primer numero');
readln(a);
writeln ('ingrese el segundo numero');
readln (b);
c:=a+b;
writeln ('el_resultadode',a,'+',b,'=',c);
readkey;
end.
|
|
|
|
|
_________________
|
|
|
|
|
sosey
Nivel 5
Registrado: 01 Abr 2007
Mensajes: 141
Ubicación: Chaco ;)
Carrera: Informática
|
|
Hola, no sé si pueden ir esos parentesis en la declaracion de variables y uso de librerias, sacalos.
osea que quede
program suma;
uses crt,dos;
var a,b,c:real;
despues, el read ln , write ln, va todo junto
readln(a); sin espacios
writeln("hola");
saludos
|
|
|
|
_________________ y de nada nos sirvió aprender...
|
|
|
|
|
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
ya lo puse, pero le di compile me aparece:
error: illegal parameter: _opentium3.
¿por que puede ser?, una cosa mas cuando pongo read se escribe en color blanco pero cuando le agrego el ln se pone amarillo ¿tiene algo que ver?
|
|
|
|
|
|
|
|
|
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
lo que volvi a escribir fue esto:
program suma;
uses dos,crt;
var a,b,c:real;
begin
writeln('ingrese_el_primer_numero');
readln(a);
writeln('ingrese_el_segundo_numero');
readln(b);
c:=a+b;
writeln('el_resultado_de',a,'+',b,'=',c);
readkey,
end.
¿tiene algun error?
|
|
|
|
|
|
|
|
|
antrax
Nivel 8
Edad: 115
Registrado: 01 Sep 2007
Mensajes: 613
Ubicación: Olivos y Wanda Misiones 2 meses al año
Carrera: Informática y Sistemas
|
|
esta bien el ultimo que escribiste salvo q el readkey le falta ";" no un "," como pusiste.
|
|
|
|
_________________
|
|
|
|
|
Izanagi
Nivel 7
Edad: 36
Registrado: 21 Ago 2008
Mensajes: 402
Ubicación: Belgrano
Carrera: No especificada
|
|
En opciones del compilador tenes que agregarle una p más
-oppentium3 (Ahora no me acuerdo bien la ruta exacta de como llegar, Creo que esta en Compiler>> Options. Despues lo busaco bien y te paso la resolucion por pm)
Despues de eso posiblemente te va a tirar un error con un archivo de configuracion. Lo buscas, lo borras, reinicias free pascal y sale con fritas.
|
|
|
|
_________________
[Campaña]Revivamos el Chat Fiuba
|
|
|
|
|
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
ok, ya cuando pongo compile no me salta ningun error, pero como lo ejecuto??
|
|
|
|
|
|
|
|
|
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
no le presten atencion al anterior ya lo ise.
muchas gracias a todos.
|
|
|
|
|
|
|
|
|
mini-afro
Nivel 7
Edad: 35
Registrado: 27 Feb 2008
Mensajes: 326
Ubicación: El Palomar
Carrera: Industrial
|
|
de nada XD (porque yo no hize nada jeje)
|
|
|
|
_________________
|
|
|
|
|
vamos_acade
Nivel 3
Edad: 36
Registrado: 15 Sep 2008
Mensajes: 24
Carrera: Sistemas
|
|
mini-afro escribió:
|
de nada XD (porque yo no hize nada jeje)
|
ya con poner a capusotto en tu imagen, estas agradecido
|
|
|
|
|
|
|
|
|
|