Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Không ai cả:>

Làm giúp mình câu này đi ;-;

Minh Lệ
30 tháng 11 2021 lúc 17:58

Program HOC24;

var m,n: integer;

Begin

write('Nhap m:'); readln(m);

write('Nhap n:'); readln(n);

if m mod n=0 then write(m/n:6:2);

if n mod n=0 then write(n/m:6:2);

if (m mod n=0) or (n mod m=0) then write(m+n);

readln

end.