Valor Bienio;
Valor Base;

Base = Salario;
Bienio = Novant / 2;
Bienio = Arrend(Bienio, 0, 1);

Se (Bienio >= X);
Bienio = X;
Senao;
Bienio = Bienio;
Fimse;

Vinf = Bienio;
Bienio = Bienio * Evtaxa(0) / 100;
Vcalc = Base * Bienio;