czescDodatnia(a):=block(if(a>0) then return(a), return (0));

czyRowne(a,b):=block(if(a=b) then return("TAK"), return("NIE"));

pomiedzy(x,a,b):=block(if(a<=x and x<=b) then return("TAK"), return("NIE"));

czescDodatnia(5);

czescDodatnia(-5);

czyRowne(4,5);

czyRowne(5,5);

pomiedzy(5,1,10);

pomiedzy(8,1,2);