Viết hàm tìm ƯCLN và hàm tìm BCNN của 2 số nguyên dương M và N. Viết chương trình tính giá trị của

0 bình luận về “Viết hàm tìm ƯCLN và hàm tìm BCNN của 2 số nguyên dương M và N. Viết chương trình tính giá trị của”

1. BCNN:program BCet;
   uses crt;
   var a,b :integer; BC :longint; BCNN :longint;
   begin
           write(‘Nhap a: ‘); readln(a);
           write(‘Nhap b: ‘); readln(b);
           BC:=a*b;
           While a <> b do
           if a>b then a:=a-b else b:=b-a;
           BCNN:=BC div a;
           writeln(BCNN);
           readln;
   end.
   UCLN:

   program Bai_5_WhileDo_UCLN;
   uses crt;
   var a,b,r,a1,a2 :int64;
   begin
           clrscr;
           a1:=a;
           a2:=b;
           write(‘Nhap a: ‘);readln(a);
           write(‘Nhap b: ‘);readln(b);
           r:= a MOD b;
           While r <> 0 do
                   begin
                           a:=b;
                           b:=r;
                           r:=a MOD b;
                   end;
          write(‘UCLN(‘,a1,’,’,a2,’)= ‘,b);
           readln;
   end.

   Bình luận

2. Đây là bài Viết hàm tìm ƯCLN và hàm tìm BCNN của 2 số nguyên dương M và N.

   Còn bài dưới thì bạn ghi rõ đề hơn được không ạ?

   .

   #include <bits/stdc++.h>
   using namespace std;
   int gcd(int a, int b) {
       int tmp;
       while(b != 0) {
           tmp = a % b;
           a = b;
           b = tmp;
       }
       return a;
   }
   int main(){
       int M,N;
       cin>>M>>N;
       cout<<“UCLN(“<<M<<“,”<<N<<“) = “<<gcd(a,b)<<endl;
       cout<<“BCNN(“<<M<<“,”<<N<<“) = “<<(a*b)/gcd(a,b);
       //samon247
       return 0;
   }

   Bình luận