Pascal/Turbo Pascal - Porqué me sucede esto en pascal (Es algo básico)

   
Vista:

Porqué me sucede esto en pascal (Es algo básico)

Publicado por Federico (19 intervenciones) el 05/04/2011 05:55:16
Recién empiezo a usar el pascal, estudio ingieniería. Cuando quiero pasar esto al pascal me sale con el error 85.

program ej 12 (input, output);

var l1,l2,l3:real;
begin

write ('ingrese 3 lados')
read(l1,l2,l3);
if (l1<>l2) and (l2<>l3)
then write (' es escaleno');
else
if (l1=l2) and (l2=l3)
then write ('es equilatero')
else write ('es isosceles')

end.


Eso es lo que paso. Ya lo intenté 2 pascal diferentes y sigue igual.

Que será? gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Porqué me sucede esto en pascal (Es algo básico)

Publicado por ramon (2072 intervenciones) el 05/04/2011 11:07:21
{ Revisa los dos códigos los fallos son de escritura o sea errores de expresiones}
{ espero te ayude suerte}


program ej12 (input, output); {1 = El nombre del programa no puede tener}
{separaciones ej 12 esta mal}
uses
crt; {Se deve de poner esta unit para manejo de pactalla}
var
l1, l2, l3 : real;
begin
clrscr; {Borramos la pantalla}
textcolor(15); {Ponemos color Blanco}
write('ingrese 3 lados ');
read(l1, l2, l3);
if (l1 <> l2) and (l2 <> l3) then
write (' es escaleno') { 2 No se pone coma antes del else}
else
if (l1 = l2) and (l2 = l3) then
write ('es equilatero')
else
write ('es isosceles');

repeat until keypressed; {Esperamos a pulsar una tecla}
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Porqué me sucede esto en pascal (Es algo básico)

Publicado por Federico (19 intervenciones) el 05/04/2011 18:58:02
¡Ahí funcionó! Mil gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar