У гусей и кроликов вместе 64 лапы. Сколько может быть кроликов и гусей (указать все сочетания) — Pascal(Паскаль)

program1;

uses crt;

var
  x, y: integer;

begin
  clrscr;
  for y := 0 to 16 do
  begin
    x := 32 - 2 * y;
    if x mod 10 = 0 then
      writeln('krolikov-', y, ' gysei-', x);
  end;

end.