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.
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.
Bạn nào biết làm bài này ko làm giúp mình với mình đang cần bài này ạ! Xin cảm ơn
Làm giúp mình bài này;-;
bạn nào giúp mình làm bài này được ko! làm bằng pascal ấy
Giúp mình câu 29 làm theo kiểu mảng giúp mình
Giúp mình câu 5 6 làm theo kiểu mảng giúp mình
Mọi người giải giúp mình 3 câu này với ạ
Viết ct nén xâu sau:
Input | Output |
AACCBBB | A2C2B3 |
ABABUUC | (AB)2U2C |
giúp mình làm bài bằng pascal nha bài này hơi khó mình cảm ơn
Giúp mình làm câu trắc nghiệm với ạ
Giúp Mình Câu Này Với Ạ Viết Chương Trình Nhập Vào Hai Số Nguyên Dương A Và B(A