Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
```cpp
#include <iostream>
using namespace std;
int main() {
int n = 36; // tổng số con
int m = 100; // tổng số chân
int g = (2*n - m/2)/3; int c = (4*n - 2*m)/6; if (g + c == n && 2*g + 4*c == m && m % 2 == 0) { cout << "So con ga: " << g << endl; cout << "So con cho: " << c << endl; } else { cout << "Khong co dap an" << endl; } return 0;
}
```
Kết quả khi chạy chương trình sẽ là:
```
So con ga: 22
So con cho: 14
```
uses crt;
var i:integer;
begin
clrscr;
for i:=9 to 25 do
if (i*2+(36-i)*4)=100 then writeln('so ga la: ',i);
writeln('so cho la: ' ,36-i);
readln;
end.
program gacho;
uses crt;
var a:integer; {1 biến là đủ)
begin
clrscr;
for a:=1 to 36 do {tốt nhất là cứ xét a từ 1 đến 36 cho tổng quát)
begin
if ((4*a+2*(36-a))=100)then {rõ ràng a+b=36 rồi đâu cần xét nữa)
begin
writeln ('so cho la', a);
writeln ('so ga la', 36-a);
end;
end;
readln;
end.
program bai1;
var i :Integer;
begin
clrscr;
for i:= 9 to 25 do
if((i * 2 + (36 - i) * 4) = 100) then
writeln('So ga la: ', i);
writeln('So cho la: ', 36 - i);
readln;
end.
Gọi x là số gà.
Số chó là:36-x
Số chân gà là:2x
Số chân chó là:4(36-x)
Theo bài ra ta có:2x+4(36-x)=100
<->2x+144-4x=100
<->2x-4x=144-100
<->2x=44
<->x=22
<->số gà là 22 con <->số chó là 36-22=14
Hoặc dùng hệ phương trình:
Gọi x là gà,y là chó.
Ta có hệ phương trình:
x+y=36 <->2x+4y=100
Giair hệ phương trình:x=22, y=14
Vậy gà có 22 con, chó có 14 con
Var a:array[1..200] of integer;
i,n,d1,d2,s:integer;
Begin
Write('Nhap so luong phan tu n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap phan tu thu ',i,' = ');readln(a[i]);
End;
For i:=1 to n do
Begin
If a[i] mod 2 = 0 then d1:=d1+1;
If (a[i] > 0) and (a[i] < 51) then d2:=d2+1;
End;
Writeln('Co ',d1,' so chan');
Write('Co ',d2,' so tu 1 den 50');
Readln;
End.
Var a:array:[1..1000] of integer;
i,n,dl,dc:integer;
Begin
Write('Nhap so luong so n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
If a[i] mod 2 = 0 then dc:=dc+1
Else dl:=dl+1;
End;
Writeln('Co ',dc,' so chan');
write('Co ',dl,' so le');
Readln
End.