K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

24 tháng 5 2019

uses crt;
var x,y,r:longint;
begin
clrscr;
write('Nhap x: ');readln(x);
write('Nhap y: ');readln(y);
while y<>0 do
begin
r:=x mod y;
x:=y;
y:=r;
end;
write('Uoc chung lon nhat cua 2 so tren la: ',x);
readln
end.

17 tháng 6 2023

def UCLN(a, b):

      if a == 0:

            return b

      elif b == 0:

            return a

      elif a == b:

            return a

      elif a > b:

            return UCLN(a - b, b)

      else:

            return UCLN(a, b - a)

10 tháng 11 2021

Cái này đâu phải lớp 10, cũng đâu phải môn tin?😮

11 tháng 11 2021

#include <bits/stdc++.h>

using namespace std;

long long m,n;

//chuongtrinhcon

long long ucln(long long a,long long b)

{

if (b==0) return(a);

else return(ucln(b,a%b));

}

//chuongtrinhchinh

int main()

{

cin>>a>>b;

cout<<ucln(a,b);

return 0;

}

b: 

Input: a,b

Output: UCLN(a,b)

21 tháng 12 2019

1

*Xác định bài toán

-input: a,b

-output: ucln(a,b);

*Xây dựng thuật toán

-Bước 1: nhập a,b

-Bước 2: nếu a>b thì a:=a-b

-Bước 3: ngược lại thì b:=b-a

-Bước 4: Nếu a<>b thì quay lại bước 2

-Bước 5: ucln:=a;

-Bước 6: Xuất ucln

-Bước 7: Kết thúc

2:

*Xác định bài toán

-input: a,b

-output: bcnn(a,b);

*Xây dựng thuật toán

-Bước 1: nhập a,b

-Bước 2: nếu a>b thì a:=a-b

-Bước 3: ngược lại thì b:=b-a

-Bước 4: Nếu a<>b thì quay lại bước 2

-Bước 5: ucln:=a;

-Bước 6: bcnn:=(a*b)/ucln;

-Bước 7: xuất bcnn

-Bước 8: Kết thúc

27 tháng 10 2021

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

long long a;

int main()

{

cin>>a;

if (a%2==0) cout<<"la so chan";

else cout<<"La so le";

return 0;

}

9 tháng 5 2023

Không có đáp án nếu đáp án `D` là dấu " ; " ở giữa `5` và `10`.

Nếu bạn nhầm dấu " , " mà viết thành dấu " ; " thì chọn `D` nhé.

uses crt;

var a,b:integer;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

if a>b then writeln('So lon nhat la: ',a)

else if a<b then writeln('So lon nhat la: ',b)

else writeln('Hai so bang nhau');

readln;

end.