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.

23 tháng 9 2019

Lời giải:

program hotrotinhoc;

var a,b : integer;

Function UCLN(x,y: integer): integer;

var z: integer;

begin

while y<>0 do

begin

z:= x mod y;

x:=y;

y:=z;

end;

ucln:=x;

end;

begin

readln(a);

readln(b);

write(ucln(a,b));

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)

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.

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;

}

23 tháng 9 2019

For a:=0 to 9 do

for x:=0 to 9 do

for b:=0 to 9 do

if a*x+b=0 then write(............

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;

}

23 tháng 9 2019

B1: Nhập các phần tử và số nguyên k

B2: Tìm tất cả phần tử bằng k

B3: Cộng tất cả tử tìm được vào 1 biến tổng

B4: In kết quả và kết thúc.