top of page

Proceso logico3
    ESCRIBIR "CALCULO P,X,Y,Z " ;
    Definir P COMO LOGICO;
    Definir T,Q,W  COMO ENTERO;
    ESCRIBIR "ESCRIBIR T" ;
    LEER T
    ESCRIBIR "ESCRIBIR Q" ;
    LEER Q
    ESCRIBIR "ESCRIBIR W" ;
    LEER W
    P<-(W^2<>T*Q)O(T*W<=Q^2)Y(W<=T^2)
    ESCRIBIR "LA RESPUESTA ES: ",P; 
FinProceso

 

*** Ejecución Iniciada. ***
CALCULO P,X,Y,Z
ESCRIBIR T
> 7
ESCRIBIR Q
> 2
ESCRIBIR W
> 5
LA RESPUESTA ES: VERDADERO
*** Ejecución Finalizada. ***

bottom of page