ai đó giúp mình bài này với
Cho 4 số nguyên dương a, b, c và d. Tìm bội số chung nhỏ nhất của bốn số đó.
Viết chương trình nhập vào 2 số nguyên dương a và b. Tìm bội số chung nhỏ nhất của a và b.
Ví dụ: BCNN(6,10) = 30
Bội số của 6: 6 12 18 24 30 36 …….
Bội số của 10: 10 20 30 40 ….
ai giúp em giải bài này với
Mn viết bằng lệnh python giúp em
Ax + By = Cz . Với điều kiện A, B, C, x, y, z đều là các số nguyên dương, trong đó x, y, z lớn hơn 2. Còn A, B, C có cùng bội số chung nhỏ nhất. đố ai giải được bài này
giúp mình viết thuật toán tìm bội số chung nhỏ nhất của 2 số A và B , biết A và B nguyên dương . Mình cảm ơn ạ
bài này tớ thấy trên mạng (Cả thế giới chưa ai giải được á)Ax + By = Cz . Với điều kiện A, B, C, x, y, z đều là các số nguyên dương, trong đó x, y, z lớn hơn 2. Còn A, B, C có cùng bội số chung nhỏ nhất.
Nội dung đề toán là hãy điền những chữ số thích hợp vào dạng định lý FLT sau:
Ax + By = Cz . Với điều kiện A, B, C, x, y, z đều là các số nguyên dương, trong đó x, y, z lớn hơn 2. Còn A, B, C có cùng bội số chung nhỏ nhất.
Bài này là bài toán hóc búa mà cả thế giới không ai trả lời được nè !!!
Mình trả lời ở dưới như thế có đúng không ?
Giải:
A = 1 ; B = 2 ; C = 3
x = 8 ; y = 5 ; z = 3
Ax + By = Cz = 1 x 8 + 2 x 5 = 3 x 6
A ; B ; C có bội số chung nhỏ nhất là 6.
Giúp mình viết chương trình với ctc với ạ
Câu 1: Tìm ước chung lớn nhất của 2 số m,n nguyên dương?
Câu 2: Tìm bội chung nhỏ nhất của 2 số m,n nguyên dương?
Câu 1:
uses crt;
var m,n,ucln,i:integer;
begin
clrscr;
write('Nhap m='); readln(m);
write('Nhap n='); readln(n);
ucln:=1;
if m<n then
begin
for i:=1 to m do
if (m mod i=0) and (n mod i=0) then
begin
if ucln<i then ucln:=i;
end;
end
else begin
for i:=1 to n do
if (m mod i=0) and (n mod i=0) then
begin
if ucln<i then ucln:=i;
end;
end;
writeln(ucln);
readln;
end.
Câu 2:
uses crt;
var m,n,bcnn,i:integer;
begin
clrscr;
write('Nhap m='); readln(m);
write('Nhap n='); readln(n);
bcnn:=m*n;
for i:=m*n-1 downto 1 do
if (i mod m=0) and (i mod n=0) then
begin
if bcnn>i then bcnn:=i;
end;
writeln(bcnn);
readln;
end.
BCNN:
program boichung;
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.
UCLN:
program UCLN;
var m,n,r,i: longint;
begin
readln(n,m);
n := abs(n);
m := abs(m);
if (n = 0) then
begin
i := 1;
write(m);
end
else
if (m = 0) then
begin
i := 1;
write(n);
end;
r := n mod m;
while r <> 0 do
begin
r := n mod m;
n:= m;
m:= r;
end;
if (i = 0) then
write(n);
readln
end.
Cho hai số nguyên dương M và N. Hãy tìm tất cả những bội chung của M và N sao cho các bội này đều nhỏ hơn hoặc bằng tích M*N.
Input: Hai số nguyên dương M và N (M,N <= 30000).
Output: Đưa ra mọi số là bội chung của M và N.
giúp mình với
Cho một dãy số gồm n phần tử ( n<=50 ) giá trị phần tử là số nguyên. thực hiện chương trình sau .
a) nhập từ bàn phím số phần tử và giá trị các phần tử
b) tính tổng các phần tử số dương của dãy
c) tìm số lớn nhất nhỏ nhất
d) in ra màng hình kết quả
uses crt;
var a:array[1..100]of integer;
i,n,t,ln,nn:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i]>0 then t:=t+a[i];
ln:=a[1];
nn:=a[1];
for i:=1 to n do
begin
if ln<a[i] then ln:=a[i];
if nn>a[i] then nn:=a[i];
end;
writeln(t);
writeln(ln);
writeln(nn);
readln;
end.
Giải hộ mình bài này nhé!!!
Phân tích 40 và số 324 ra thừa số nguyên tố. Từ đó hãy tìm số tự nhiên k nhỏ nhất thỏa mãn 40k là bội số của 324.
AI NHANH MÌNH TICK CHO
Ta có : 40 = 23 . 5
324 = 22 . 34