fork download

copy

program ideone;
var 
	anio:integer;
	bisiesto :boolean;
begin
	(* your code goes here *)
	writeln('Ingresa el año');
	readln(anio);
	aa:=bb;
	if(mod(anio,4)==0)then
		bisiesto:=true;
		else
			if((mod(anio,100))==0)then
			bisiesto:=false;
			else
			bisiesto:=true;
			end if
		end if
	end if
	if(bisiesto)then
		writeln('El año es bisiesto');
	else
		writeln('El año no es bisiesto');
		end if
	end if
end if
end.

prog.pas: In main program:
prog.pas:9: error: undeclared identifier `aa' (first use in this routine)
prog.pas:9: error:  (Each undeclared identifier is reported only once
prog.pas:9: error:  for each routine it appears in.)
prog.pas:9: error: undeclared identifier `bb' (first use in this routine)
prog.pas:10: error: syntax error before `mod'

Standard output is empty