D
datcoder
Giáo viên
14 tháng 10 2023
Đúng(0)
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.
Dưới đây là một vài câu hỏi có thể liên quan tới câu hỏi mà bạn gửi lên. Có thể trong đó có câu trả lời mà bạn cần!
LD
10 tháng 7 2021
var a,b,i,t,s: word;
begin
repeat
writeln('Nhap A,B vao: (cach nhau boi dau Enter)');
readln(a);
read(b);
writeln('Nhap lai gia tri A,B: ');
until (a>=1) and (b>=1) and (a<=10000) and (b<10000);
s:=a+b;
t:=a*b;
if s<t then i:=s else i:=t;
while (s mod i <> 0) or (t mod i <> 0) do i:=i-1;
writeln('UCLN cua A+B va AB: ',i);
writeln('So du khi chia AB cho A+B: ', t mod s);
end.
5 tháng 5 2021
Bài 1:
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 6=0 then s:=s+i;
writeln(s);
readln;
end.
5 tháng 5 2021
Bài 2:
uses crt;
var a,b,c,ucln,i:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
while a<>b do
begin
if a>b then a:=a-b
else b:=b-a;
end;
ucln:=a;
while ucln<>c do
begin
if ucln>c then ucln:=ucln-c
else c:=c-ucln;
end;
writeln(ucln);
readln;
end.
18 tháng 12 2021
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%2==0) cout<<"Chan";
else cout<<"Le";
return 0;
}
15 tháng 3 2022
1 không
2
Program UCLN;
uses crt;
var a,b : integer;
begin
write ('nhap so a la ');readln (a);
write ('nhap so b la ');readln (b);
while a < > b do
if a >b then a := a - b else b := b - a ;
write ( ' UCLN la :' , a );
readln
end.
15 tháng 3 2022
1:
#include <bits/stdc++.h>
using namespace std;
int n,i;
bool kt;
int main()
{
cin>>n;
kt=true;
for (i=2; i*i<=n; i++)
if (n%i==0) kt=false;
if (kt==true && n>1) cout<<"La so nguyen to";
else cout<<"Khong la so nguyen to";
return 0;
}
