PASCAL?

Es una larga Historia de Como llego este Ejercicio de Pascal a Mis manos y nos es graciosa asi que la Omitire.

tengo que crear un prograna que indique si el numero es par o impar positivo o negativo, calcular el cuadrado del numero la raiz y convertir el numero en caracter y obtener el largo del numero�


grisuno@localhost :/src$ more ejemplopascal.txt
Program Ejercicio;
Var numero : Real;
cadena : string;
BEGIN
Readln (numero);
If (numero mod 2 = 0) then
begin
write('El numero es Par');
end
else
begin
write('El numero es Impar');
end;
if (numero > 0) then
begin
write('El numero es Positivo');
end
else
begin
write('El numero es Negativo');
end;
write('El cuadrado de N es: ');
writeln(numero * numero);

write('La raiz de N es: ');
riteln(numero ^ 0.5);

str(numero , cadena);
writeln(cadena);
Length(cadena);

END.

/** sigo odiando el reordenamiento a las sangrias de este servicio de blog **/