Viết chương trình nhập 2 số nguyên dương
a, Tìm trung bình cộng của chúng
b, Tìm trong số đó có bao nhiêu là số bội của số kia
Viết chương trình nhập 2 số nguyên dương
a, Tìm trung bình cộng của chúng
b, Tìm trong số đó có bao nhiêu là số bội của số kia
Đây ạ
a>Var a,b: integer;
Tbc:real;
BEGIN
Write(‘nhap a’);read(a);
Write(‘nhap b’);read(b);
Tbc:=(a+b)/2;
Write(‘tung binh cong cua a va b la’,tbc);
CÂU B MÌNH HOK BIẾT ~SORY