Вообще не понимаю в программах

//pascalabc.net

1)

var

  num, sum: integer;

begin

  sum : = 0;

  repeat

    read(num);

    if (num mod 4 = 0) and (num div 1000 = 0) and (num div 100 < > 0) then

      sum : = sum + num;

  until (num = 0);

  write(sum);

end.

2)

var

  num, max, n, i: integer;

begin

  max : = 0;

  read(n);

  for i : = 1 to n do

  begin

    read(num);

    if (num mod 10 = 3) and (num > max) then

      max : = num;

  end;

  write(max);

end.

Мое предложение - в массиве 20 на 20 храниться структура struct cell { int rabbit; // кол-во зайцев int* wolfs; // очки волков int* she_wolfs; // очки волчиц } очки предлагаю хранить умноженными на 10 во избежания проблем вещественным сравнением. но есть одна проблема с в целом. это порядок ходов. если в двух соседних клетках находятся заяц и волк, и первый ходит заяц, то волк может остаться голодным. если же первый ходит волк - он то зайца может скушать. поэтому, я предлагаю, что вначале ходят все зайцы, потом все волки - по очереди.

решающую роль в  результативности поиска играет правильно сформированный поисковый запрос. общим правилом для любого поисковика будет составление запроса в  максимально сжатом и  лаконичном виде. тут нужен некоторый опыт, так как если задать слишком общий вопрос, то  вас завалит результатами не  по  делу, а  на  слишком конкретный может ничего не  найтись. например, если вас интересует общая информация по  курортам италии на  адриатическом море, то  не  стоит писать «отдых в  италии», гораздо лучше так и  составить поисковый запрос «курорты италии на  адриатическом море». слишком усложнять фразу тоже не  стоит.

однако поисковики последнее время несколько поумнели и  теперь, когда вы  набираете в  браузере  свой поисковый запрос, вам по  мере набора показываются различные варианты часто встречающихся запросов, вы  можете выбрать один из  них или ввести свой вариант. иногда это выручает, когда не  получается самому сформулировать его сразу. поисковый запрос не  чувствителен к  регистру ввода, а  также обычно отбрасывает знаки препинания, предлоги и  часто употребляющиеся слова.