Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Minh Lệ
Xem chi tiết
datcoder
14 tháng 10 2023 lúc 21:47

loading...

Mai Xuân Phúc
Xem chi tiết
Nguyễn Lê Phước Thịnh
4 tháng 4 2022 lúc 21:51

#include <bits/stdc++.h>

using namespace std;

long long m,n;

//chuongtrinhcon

long long ucln(long long m,long long n)

{

if (n==0) return(m);

else return(ucln(n,m%n));

}

//chuongtrinhchinh

int main()

{

cin>>n>>m;

cout<<ucln(n,m);

return 0;

}

Mai Xuân Phúc
4 tháng 4 2022 lúc 22:02

Pascal bạn ơi

Bảo Hoàng
Xem chi tiết
Lê Việt Long
Xem chi tiết
Mai Xuân Phúc
Xem chi tiết
Mai Xuân Phúc
Xem chi tiết
Khánh Ly Đỗ Vũ
Xem chi tiết
Trần Tuấn Hoàng
3 tháng 3 2022 lúc 10:58

Python:

a=int(input('a= '))

b=int(input('b= '))

if a<b:

        print('a la so be nhat')

        if a>b:

                 print('b la so be nhat')

        else:

                  print('a=b')

Nguyễn Lê Phước Thịnh
3 tháng 3 2022 lúc 12:52

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

if (a<b) then write(a)

else write(b);

readln;

end.

Vũ Kiệt
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 22:26

Câu 1: 

uses crt;

var m,n,ucln,i:integer;

begin

clrscr;

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

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

ucln:=1;

if m<n then 

begin

for i:=1 to m do 

if (m mod i=0) and (n mod i=0) then 

  begin

if ucln<i then ucln:=i;

end;

end

else begin

for i:=1 to n do 

  if (m mod i=0) and (n mod i=0) then 

begin

if ucln<i then ucln:=i;

end;

end;

writeln(ucln);

readln;

end.

Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 22:27

Câu 2: 

uses crt;

var m,n,bcnn,i:integer;

begin

clrscr;

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

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

bcnn:=m*n;

for i:=m*n-1 downto 1 do 

  if (i mod m=0) and (i mod n=0) then

begin

if bcnn>i then bcnn:=i;

end;

writeln(bcnn);

readln;

end.

Vũ Quang Vinh
31 tháng 8 2021 lúc 15:48

BCNN:

program boichung;
var m,n: word;

procedure Input;
        begin
            readln(m,n);
        end;

function BC(m,n: word): word;
var i: word;
       begin
           for i := 1 to n * m do
               if (i mod n = 0) and (i mod m = 0) then
                   write(i,' ');
       end;

begin
    Input;
    BC(m,n);
end.

UCLN:

program UCLN;
var m,n,r,i: longint;
begin
readln(n,m);

n := abs(n);
m := abs(m);

if (n = 0) then
    begin
        i := 1;
        write(m);
    end
else
    if (m = 0) then
        begin
            i := 1;
            write(n);
        end;

r := n mod m;
while r <> 0 do
      begin
        r := n mod m;
        n:= m;
        m:= r;
      end;
if (i = 0) then
    write(n);

readln    
end.

Bạch Đình Khang
Xem chi tiết
supersaiya
17 tháng 2 2016 lúc 12:53

bài 1 , a= 2004! : 7 nha

bài 2:x =2

Ad Dragon Boy
20 tháng 4 2017 lúc 19:33

1. a = 2004 

2. x = 2

Đúng 100%

Đúng 100%

Đúng 100%

Fenny
Xem chi tiết
lê đức anh
23 tháng 12 2019 lúc 20:41

a) vì số nguyên âm nhỏ hơn 0,số nguyên dương lớn hơn 0

b)100 và (-999)

Khách vãng lai đã xóa
The Maker(TPCT)
25 tháng 12 2019 lúc 22:25

a. Giải thích vì sao mọi số nguyên âm đều nhỏ hơn số nguyên dương.

-- > Mọi số nguyên âm đều nhỏ hơn số nguyên dương vì số nguyên âm nhỏ hơn 0 còn số nguyên dương lớn hơn 0.

b. Tìm số nguyên dương nhỏ nhất có ba chữ số. Số nguyên âm nhỏ nhất có ba chữ số?

-- > Số nguyên dương nhỏ nhất có ba chữ số là 100.

       Số nguyên âm nhỏ nhất có ba chữ số là (-999).

Khách vãng lai đã xóa