[LỚP 8] Viết chương trình

[thuyduongc2tv]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Vừa gà vừa chó
Bó lại cho tròn
Ba mươi sáu con
Một trăm chân chẵn
Hỏi có bn con gà? Bn con chó?
Hãy viết chương trình giải bài toán trên?
mong mn giúp em với mai con cần gấp

 

[ka1412]

uses crt;
var i,y:byte;
begin
    for i:=1 to 36 do
    begin
        y := 36-i;
        if 2*i+4*y=100 then writeln('Co ',i,' con ga, ',y,' con cho.');
    end;
readln
end.