Viết chương trình con tìm ƯCLN của 3 số nguyên Giúp mk vs ạ 18/07/2021 Bởi Ruby Viết chương trình con tìm ƯCLN của 3 số nguyên Giúp mk vs ạ
Chương trình con: function UCLN(a,b,c:integer):integer; begin while a<>b do if a>b then a:=a-b else b:=b-a; while a<>c do if a>c then a:=a-c else c:=c-a; UCLN:=a; end; Bình luận
Chương trình con:
function UCLN(a,b,c:integer):integer;
begin
while a<>b do
if a>b then a:=a-b else b:=b-a;
while a<>c do
if a>c then a:=a-c else c:=c-a;
UCLN:=a;
end;