Viết chương trình tìm ước chung lớn nhất của 2 số nguyên.In kết quả ra màn hình

Question

Viết chương trình tìm ước chung lớn nhất của 2 số nguyên.In kết quả ra màn hình

in progress 0
Acacia 6 years 2020-10-17T15:16:06+00:00 3 Answers 160 views 0

Answers ( )

  1. thuthuy
    0
    2020-10-17T15:18:01+00:00
    Reply

    Program bai_tap;

    Uses crt;

    Var M,N: integer;

    Begin

       clrscr;

       write (‘Nhập M, N= ‘);

       readln (M,N);

       While M <> N do

            if M >N then M:= M – N else N:= N – M;

       writeln( ‘ UCLN = :  ‘, M);

       readln

    End.

  2. Nho
    0
    2020-10-17T15:18:03+00:00
    Reply

    Program UCLN;

    uses crt; var a,b : integer;

    begin write (‘nhap so a la ‘);

    readln (a);

    write (‘nhap so b la ‘);

    readln (b);

    while a < > b do

    if a >b then a := a – b else b := b – a ;

    write ( ‘ UCLN la :’ , a );

    readln

    end.

    ~~~~~~~~~~~~~~~~~~ Chúc bn học tốt ~~~~~~~~~~~~~~~~~

  3. RuslanHeatt
    0
    2020-10-17T15:18:11+00:00
    Reply

    Để tìm câu trả lời chính xác các em hãy tham khảo tìm ước chung của 2 số các nguồn hoc24.vn, lazi.vn, hoidap247.com để thầy cô và các chuyên gia hỗ trợ các em nhé!

Leave an answer

Browse

Giải phương trình 1 ẩn: x + 2 - 2(x + 1) = -x . Hỏi x = ? ( )