Ta có tổng 2 loại là 36 con . Như vậy số con gà sẽ nằm trong khoảng từ 0 đến 36. Số còn lại sẽ là chó.

Theo giả thiết đề bài ta có số gà*2+số chó *4 =100.

Như vậy ta sẽ có code như sau:

program bai6;
uses crt;
var ga,cho:integer;
begin
 clrscr;
 for ga:=0 to 36 do
  if ga*2+(36-ga)*4=100
  then
  writeln('so ga la ',ga,' so cho la ',36-ga);
 readln;
end.

Kết quả: