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.
#include <iostream>
using namespace std;
int main()
{
int t,m,n,ucln;
cout<<"Nhap n="; cin>>n;
cout<<"Nhap m="; cin>>m;
t=m%n;
while (t!=0)
{
t=n%m;
n=m;
m=t;
}
ucln=n;
cout<<ucln;
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long a,b,c;
bool kt;
int main()
{
cin>>a>>b>>c;
kt=false;
if (a==(b+c)/2) kt=true;
if (b==(a+c)/2) kt=true;
if (c==(b+a)/2) kt=true;
if (kt==false) cout<<"Khong lap duoc";
else cout<<"Lap duoc";
return 0;
}
const fi='snt.inp';
fo='snt.out';
var f1,f2:text;
n,i:integer;
a,b:array[1..100]of integer;
{-----------------ham-kiem-tra-so-nguyen-to-------------------------}
function ktra(x:integer):boolean;
var kt:boolean;
i:integer;
begin
kt:=true;
for i:=2 to x-1 do
if x mod i=0 then kt:=false;
if kt=true then ktra:=true
else ktra:=false;
end;
{---------------------chuong-trinh-chinh---------------------}
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do
readln(f1,a[i],b[i]);
for i:=1 to n do
if ktra(a[i]-b[i])=true then writeln(f2,'YES')
else writeln(f2,'NO');
close(f1);
close(f2);
end.
uses crt;
var n,i,dem:integer;
{----------------ham-kiem-tra-so-nguyen-to---------------------------}
function ktnt(x:integer):boolean;
var kt:boolean;
i:integer;
begin
kt:=true;
for i:=2 to trunc(sqrt(x)) do
if x mod i=0 then kt:=false;
if kt=true then ktnt:=true
else ktnt:=false;
end;
{-----------------chuong-trinh-chinh-----------------------}
begin
clrscr;
write('Nhap n='); readln(n);
dem:=0;
for i:=2 to n do
if (n mod i=0) and (ktnt(i)=true) then inc(dem);
writeln(dem);
readln;
end.
câu 1
Program Nguyen_to;
Var n,i:integer;
Function NT(n:integer):Boolean;
Var ok: Boolean;
i: integer;
Begin ok:=true;
for i:=2 to n-1 do if (n mod i)= 0 then ok:=ok and false;
if n < 2 then NT:=false else NT:=ok;
End;
Begin Write('Nhap n: ');
Readln(n); i:=n;
Repeat i:=i+1;
Until NT(i);
Write('So nguyen to nho nhat lon hon ',n, 'la: ',i);
Readln End.
câu 2
uses crt;
const so: set of char=['0','1','2','3','4','5','6','7','8','9'];
var a:array[1..100] of integer;
st,b:string;
c,l,i,n,j:integer;
s, Max: integer;
begin clrscr;
write('Nhap xau:');
readln(st);
l:=length(st);
i:=1;
n:=0;
repeat if (st[i] in so) then begin b:='';
repeat b:=b+st[i];
inc(i);
until (not(st[i] in so)) or (i>l);
inc(n);
val(b,a[n],c);
end;
inc(i);
until i>l;
Max:=a[1];
for i:=2 to n do If Max<A[i] Then Max:=A[i];
Writeln('Phan tu lon nhat cua mang:', Max);
readln;
end.
Bước 1: Xác định bài toán - Bài toán là tìm bội số chung nhỏ nhất của hai số nguyên dương a và b.
Bước 2: Xây dựng thuật toán - Một thuật toán phổ biến để tìm bội số chung nhỏ nhất là sử dụng thuật toán Euclid mở rộng hoặc sử dụng phép nhân của hai số để tìm ra kết quả. Bạn có thể chọn thuật toán mà bạn muốn sử dụng.
Bước 3: Lập trình - Chọn một ngôn ngữ lập trình và viết mã lệnh thực hiện thuật toán đã chọn. Bạn có thể sử dụng ngôn ngữ lập trình như Python, C++, Java, JavaScript, v.v.
Bước 4: Kiểm thử và chạy chương trình - Nhập giá trị của a và b từ người dùng hoặc sử dụng các giá trị mẫu để kiểm thử chương trình. Chạy chương trình và kiểm tra kết quả để đảm bảo rằng nó trả về bội số chung nhỏ nhất của a và b.