Những câu hỏi liên quan
KC
Xem chi tiết
PK
Xem chi tiết
KL
6 tháng 5 2023 lúc 11:42

Var a,b,ta,tb,r,ucln,bcnn:integer;

Begin

Write('a = ');readln(a);

Write('b = ');readln(b);

ta:=a;

tb:=b;

Repeat

r:=ta mod tb;

ta:=tb;

tb:=r;

Until r = 0;

ucln:=ta;

bcnn:=a*b div ucln;

Writeln('UCLN(',a,' ',b,') la ',ucln);

Write('BCNN(',a,' ',b,' la ',bcnn);

Readln

End.

Bình luận (0)
TK
Xem chi tiết
MT
Xem chi tiết
MT
Xem chi tiết
NH
Xem chi tiết
VL
Xem chi tiết
VD
23 tháng 3 2016 lúc 21:22

Vì ƯCLN=6 nên a=6k ,b=6q(k thuộc N ; UCLN(k,q)=1) mà ab=216

-->6k.6q=216

-->k.q=6 mà (k,q)=1

Nếu k=1 thì q=6 -->a=6,b=36

Nếu k=2 thì q=3 -->a=12,b=18

Nếu k=3 thì q=2-->a=18 b=12

Nếu k=6 thì q=2 -->a=36 b=6

Bình luận (0)
TN
2 tháng 1 2017 lúc 17:30

Vì ƯCLN=6 nên a=6k ,b=6q(k thuộc N ; UCLN(k,q)=1) mà ab=216

-->6k.6q=216

-->k.q=6 mà (k,q)=1

Nếu k=1 thì q=6 -->a=6,b=36

Nếu k=2 thì q=3 -->a=12,b=18

Nếu k=3 thì q=2-->a=18 b=12

Nếu k=6 thì q=2 -->a=36 b=6

Bình luận (0)
AN
20 tháng 11 2017 lúc 21:03

đáp án của minh cung nhu the

Bình luận (0)
H24
Xem chi tiết
H24
Xem chi tiết
LK
24 tháng 6 2018 lúc 12:35

......................?

mik ko biết

mong bn thông cảm 

nha ................

Bình luận (0)