Взгляни на берег - там ты увидишь две банки . В одну из них помещается ровно два литра воды , а в другую - три . Как налить в двухлитровую банку точно один литр ? Укажите два

2) Перелить воду из трехлитровой банки в двухлитровую.

В трехлитровой банке останется 1 литр, двухлитровая банка будет полная

3) Вылить воду из двухлитровой банки

4) Перелить из трехлитровой банки в двухлитровую банку

Трехлитровая банка станет пустой, в двухлитровой банке будет 1 литр

Конец Налить воду в двухлитровую банку

2) Перелить воду из двухлитровой банки в трехлитровую банку

В двухлитровой банке будет пусто, в трехлитровой банке будет 2 литра воды

3) Налить воду в двухлитровую банку

Двухлитровая банка будет полная, в трехлитровой банке будет 2 литра воды

4) Перелить из двухлитровой банки в трехлитровую

Трехлитровая банка станет полной, в двухлитровой банке будет 1 литр

Конец

.........................................

program xxx;

  var i, k, c, e : integer

begin

  k: =0;

  for i: =100 to 999 do

      begin

          c: = i div 100;

          e: =i mod 10;

          if c = e then k: =k+1

    end;

  writeln('кол-во палиндромов =', k);

  readln

end.

var a: array [1..10] of integer;

i,k: integer;

begin

  read(a);

  k: =1;

  for i : = 1 to 10 do

  begin

        if a[k]> a[i] then k: =i;

  end;

  if k mod 2 = 0 then writeln(k," - chetnoe")

  else writeln(k," - ne chetnoe");

end.