Pascal/Turbo Pascal - IF THE ELSE

   
Vista:
Imágen de perfil de Gabriela

IF THE ELSE

Publicado por Gabriela (5 intervenciones) el 17/04/2015 01:24:31
NO ME CORRE MI PROGRAMA ALGUIEN ME PUEDE AYUDAR O DECIR EN QUE ESTOY MAL.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
program alumno;
uses crt;
var
a:string;
materia:integer;
begin
writeln('Ingresa el numero de materias que debas');
readln (materia);
if materia = >3 then
begin
writeln ('No eres un alumno regular')
 
else
writeln ('¨Acreditaste 2 materia del area de mateticas?S/N');
readln (a);
end;
 
if (a='s') then
begin
 
writeln ('Estas listo para ingresar al la ingenieria');
readln;
else
writeln ('Suerte para la proxima');
end;
end;
end.
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

IF THE ELSE

Publicado por dario delgado (20 intervenciones) el 17/04/2015 05:42:04
Tu programa corregido es este.
Fijate en el operador >= tu has puesto => esta mal.
Tambien fijate en los bloques begin end de los if y else.
Saludos.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program alumno;
uses crt;
var
	a:string;
	materia:integer;
begin
	writeln('Ingresa el numero de materias que debas');
	readln (materia);
	if materia >=3 then
		writeln ('No eres un alumno regular')
	else begin
		writeln ('¨Acreditaste 2 materia del area de mateticas?S/N');
		readln(a);
		if (a='s') then
			writeln ('Estas listo para ingresar al la ingenieria')
		else
			writeln ('Suerte para la proxima');
	end;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar