Question

Câu 1)Xây dựng thuật toán: tên bội chung nhỏ nhất 2 số nguyên dương

Answer 1

Nhập vào 2 số A và B
Bội chung nhỏ nhất của A và B chính là Thương của A * B với ước chung lớn nhất của A và B

Ở đây bạn không nói bạn làm bằng ngôn ngữ gì nên mình không thể post code lên được. Mình viết theo cách mình hiểu thôi nha.

Đầu Tiên nhập A và B
gọi P = A*B
while ( a khác b)
nếu a > b
a = a - b
ngược lại
b = (b - a)
end while
lúc này A=B là ước chung lớn nhất của A, B lúc đầu
bội chung nhỏ nhất bẳng P\A

Answer 2

program quangvinh255;
var m,n: word;

procedure Input;
        begin
            readln(m,n);
        end;

function BC(m,n: word): word;
var i: word;
       begin
           for i := 1 to n * m do
               if (i mod n = 0) and (i mod m = 0) then
                   write(i,' ');
       end;

begin
    Input;
    BC(m,n);
end.