Proceso logico2
    escribir 'calculo Q,P,T';
    Definir Q COMO LOGICO;
    Definir P,T  COMO ENTERO;
    ESCRIBIR "ESCRIBIR P" ;
    LEER P;
    ESCRIBIR "ESCRIBIR T" ;
    LEER T;
    Q<-(T^2<=3)Y(P<>T^2)O(P*T<P^2);
    ESCRIBIR "LA RESPUESTA ES: ",Q;
FinProceso