Viết CT tìm lời giải cho các bài toán sau Trong giỏ vừa thỏ vừa gà, 100 cái cẳng, 43 cái đầu. Hỏi mấy gà, mấy thỏ?

Program bai3; Uses crt; Var ga,tho:byte; Begin Clrscr; for ga:=1 to 43 do begin tho:=43 - ga; if 4*tho+2*ga=100 then writeln('so ga va tho la: ',ga,' ',tho); end; Readln End.