👤

fie functia:
function secret (x;integer):integer
var i,j : integer
begin i:=2*x;
if i>10 then j:=x mod 2 else j:=x div3;
secret:=j-2*x;
end.
Ce va afisa acest fragment de program pentru x=10 la adresarea Writeln (secret(x))?
Demonstrati.