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
Hiền Nguyễn
Xem chi tiết
nguyễn an phát
27 tháng 5 2021 lúc 14:24

a)

program UCLN_va_BCNN;

uses crt;

var a,b,c,r,p:integer;

begin

clrscr;

write('nhap a,b:');readln(a,b);

if a<b then 

begin

c:=a;

a:=b;

b:=c;

end;

p:=a*b;

r:=a mod b;

while r<>0 do

begin

a:=b;

b:=r;

r:=a mod b;

end;

writeln('UCLN la: ',b);

writeln('BCNN la: ',p div b);

readln;

end.

nguyễn an phát
27 tháng 5 2021 lúc 14:30

b)

program fibonaci;

uses crt;

var i,n:integer;

a:array[1..30]of integer;

begin

clrscr;

repeat

write('nhap n:');readln(n);

if (n<1)or(n>30) then writeln('so n phai lon hon hoac bang 1 va nho hon hoac bang 30:);

until (n>=1)and(n<=30);

a[1]:=1;

a[2]:=1;

for i:=3 to n do

a[i]:=a[i-1]+a[i-2];

writeln(n,' so fibonaci dau tien la:');

for i:=1 to n do

write(a[i]:3);

readln;

end.

Bùi Nguyễn Ngọc Anh
Xem chi tiết
Bùi Nguyễn Ngọc Anh
14 tháng 2 2022 lúc 14:35

làm ơi cíuuuu

 

Như Nguyệt
14 tháng 2 2022 lúc 14:38

Tham Khảo:

Nguyễn Lê Phước Thịnh
14 tháng 2 2022 lúc 14:40

#include <bits/stdc++.h>

using namespace std;

long long n,m,x,i;

//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>>m>>n;

x=ucln(m,n);

for (i=1; i<=x; i++) if (x%i==0) cout<<i<<" ";

cout<<endl;

cout<<"Uoc chung lon nhat="<<x<<endl;

cout<<"Boi chung nho nhat="<<(m*n)/x<<endl;

return 0;

}

Thủy Tiên
Xem chi tiết
Nguyễn An Ninh
12 tháng 5 2023 lúc 21:28

``python
def UCLN(a, b):
if b == 0:
return a
else:
return UCLN(b, a % b)
a = int(input("Nhập số nguyên a: "))
b = int(input("Nhập số nguyên b: "))
benn = (a * b) // UCLN(a, b)
print("BCNN của", a, "và", b, "là:", bann)

Kiều Vũ Linh
13 tháng 5 2023 lúc 10:34

var a,b,ta,tb,r,bcnn:integer;

begin

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

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

ta:=a;

tb:=b;

repeat

r:=ta mod tb;

ta:=tb;

tb:=r;

until r=0;

bcnn:=a*b/ta;

write('BCNN(',a,' ',b,') la ',bcnn);

readln

end.

Hải Hoàng
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 3 2022 lúc 8:13

#include <bits/stdc++.h>
using namespace std;
long long a,b,bcnn;
int main()
{
    cin>>a>>b;
    if (a>b) swap(a,b);
    bcnn=b;
    while (bcnn%a!=0)
        bcnn=bcnn+b;
    cout<<bcnn;
    return 0;
}

 

phuthuong
Xem chi tiết
phan đăng khoa
Xem chi tiết
Kiều Vũ Linh
6 tháng 5 2023 lúc 11:42

Var a,b,ta,tb,r,ucln,bcnn:integer;

Begin

Write('a = ');readln(a);

Write('b = ');readln(b);

ta:=a;

tb:=b;

Repeat

r:=ta mod tb;

ta:=tb;

tb:=r;

Until r = 0;

ucln:=ta;

bcnn:=a*b div ucln;

Writeln('UCLN(',a,' ',b,') la ',ucln);

Write('BCNN(',a,' ',b,' la ',bcnn);

Readln

End.

khonopro
Xem chi tiết
Phía sau một cô gái
6 tháng 3 2023 lúc 20:38

program UocChung;

var

      a, b, i: integer;

      uocchung: array[1..100] of integer;

      n: integer;

begin

      write('Nhap a=');

      readln(a);

      write('Nhap b=');

      readln(b);

      n := 0;

      for i := 1 to 100 do

            if (a mod i = 0) and (b mod i = 0) then

            begin

                  uocchung[n] := i;

                  n := n + 1;

            end;

      write('Uoc chung cua ', a, ' va ', b, ' la: ');

      for i := 0 to n-1 do

             write(uocChung[i], ' ');

      readln;

end.

mini
Xem chi tiết
nguyenthienho
8 tháng 12 2019 lúc 19:40

program bai1;

uses crt;

var a,b: integer;

begin

clrscr;

write('nhap so a ='); readln(a);

write('nhap so b ='); readln(b);

writeln(' hai so vua nhap la so: ' ,a,' va ',b);

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

writeln('so lon nhat la : ' ,b);

readln;

end.

Khách vãng lai đã xóa
Bùi Anh Tuấn
8 tháng 12 2019 lúc 19:53

program ho_tro;

uses crt;

var a,b,max: real;

begin

clrscr;

writeln(' nhap a va b:'); readln(a,b);

max:=a;

max:=b;

if  max<a then max:=a;

if max<b then max:=b;

writeln(' so lon nhat la :',max);

readln;

end.

lần sau nếu có hỏi j về tin thì qua bên h mik sẽ giúp

Khách vãng lai đã xóa
Lý Mạc Sầu
Xem chi tiết