Записать в поле длиной в 4 байта число 1100110000010101. Пронумеровать заряды ​

Вот ответ на фото , не благодари)

квадратная стена в каждый угол посадить по зайцу, это будет 4 зайца, а пятого посадить в получаем у каждой стены по2 зайца

var a, b, c: integer;

begin

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

if a < b then if a < c then writeln(a, ' - меньшее') else writeln(c, ' - меньшее') else if b < c then writeln(b, ' - меньшее') else writeln(c, ' - меньшее'); end.