Задача про шары в шляпах [Паскаль]

[t2skler]

Собственно дело в том что нужно написать программы, а я не знаю как, помогите, если можете.
1. Фокусник показывает следующий трюк. Он помещает W белых и B чёрных шаров в шляпу и просит кого-нибудь из аудитории,например Васю, вытаскивать по 2 шара из шляпы в произвольном порядке. Если Вася вытаскивает 2 шара одного цвета, он должен положить в шляпу один белый (для фокуса имеются доп. шары помимо тех, что лежат в шляпе). В противном случае он кладёт в шляпу чёрный шар.
Когда в шляпе остаётся только один шар, Вася просит фокусника угадать какого он цвета. Конечно же фокусник не знает в какой очерёдности Вася вытаскивал шары. Напишети программу которая поможет фокуснику определить цвет шара, оставшегося в шляпе.
Общее количество шаров в шляпе не меньше 1 и не больше 2*10^9

[Mad_Cat]

//c -количество черных шаров во 2 шляпе
w:=w-c;
b:=b-c;
if odd(w) then writeln ('black');
if odd(b) then writeln  ('white');