ВУЗ:
Составители:
Рубрика:
79
best (T, Poz2, Oc2),
vibor(Poz1,Oc1,Poz2,Oc2,BestPoz,BestOc).
vibor(Poz0, Oc0, Poz1, Oc1, Poz0, Oc0):-
xod_min (Poz0), Oc0>Oc1,!;
xod_max (Poz0), Oc0<Oc1,!.
vibor(Poz0, Oc0, Poz1, Oc1, Poz1, Oc1).
goal
minmax(a,BestPoz,Oc),write(BestPoz),write(Oc).
