ai giúp mình vs
Nhập 2 số nguyên dương M và N (M<N). Tính tổng các số chia hết cho 3 hoặc 5 trong phạm vi từ M đến N.
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 <bits/stdc++.h>
using namespace std;
int main()
{
int m,n;
cin>>m>>n;
int k=m*n;
for (int i=1; i<=k; i++)
cout<<i<<" ";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
int main()
{
int m,n;
cin>>m>>n;
int k=m*n;
for (int i=1; i<=k; i++)
cout<<i<<" ";
return 0;
}
Program Tin_hoc;
Uses crt;
Var i,n,dem:integer;
a:array[1..100000] of integer;
Begin
clrscr;
Write('Nhap 1 so nguyen duong n: ');readln(n);
dem:=0;
Writeln('Nhap ',n,' phan tu:');
For i:= 1 to n do
Begin
Write('A[',i,'] = ');
readln(a[i]);
If a[i] mod 2 = 0 then inc(dem);
End;
Writeln('Day vua nhap la:');
For i:= 1 to n do write(a[i],' ');writeln;
Writeln('Day so vua nhap co ',dem,' so chan');
readln;
End.
uses crt;
var a:array[1..100]of integer;
i,n,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
writeln;
dem:=0;
for i:=1 to n do
if a[i] mod 2=0 then inc(dem);
writeln('So so chan la: ',dem);
readln;
end.
uses crt;
var n,m,i,dem,t,t1,d1:integer;
//chuongtrinhcon
function ktnt(var n:integer):boolean;
var i:integer;
kt:boolean;
begin
kt:=true;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=false;
if (kt=true) then ktnt:=true
else ktnt:=false;
end;
//chuongtrinhchinh
begin
clrscr;
readln(n,m);
if (ktnt(n)=true) then writeln(n,' la so nguyen to')
else writeln(n,' ko la so nguyen to');
dem:=0;
t:=0;
for i:=2 to n do
if (ktnt(i)=true) then
begin
write(i:4);
t:=t+i;
dem:=dem+1;
end;
writeln;
writeln(t,' ',dem);
t1:=0;
d1:=0;
for i:=n to m do
if ktnt(i)=true then
begin
write(i:4);
t1:=t1+i;
inc(d1);
end;
writeln;
writeln(t1,' ',d1);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b;
//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;
}
uses crt;
var m,n,s,i:integer;
begin
clrscr;
readln(m,n);
s:=0;
for i:=m to n do
if i mod 2=0 then s:=s+i;
writeln(s);
readln;
end.
uses crt;
var m,n,s,i:integer;
begin
clrscr;
readln(m,n);
s:=0;
for i:=m to n do
if i mod 2=0 then s:=s+i;
writeln(s);
readln;
end.
uses crt;
var m,n,t,t1,i:integer;
begin
clrscr;
repeat
write('m='); readln(m);
write('n='); readln(n);
if m>=n then writeln('ban da nhap sai,yeu cau ban nhap lai');
until m<n;
t:=0;
t1:=0;
for i:=m to n do
begin
if i mod 3=0 then t:=t+i;
if i mod 5=0 then t1:=t1+i;
end;
writeln('tong cac so chia het cho 3 trong day so tu ',m,' toi ',n,' la: ',t);
writeln('tong cac so chia het cho 5 trong day so tu ',m,' toi ',n,' la: ',t1);
readln;
end.
*Đề không yêu cầu nhập lại nên bạn không cần sử dụng repeat..until .
*Đề yêu cầu tính tổng các số chia hết cho 3 hoặc 5 nên bạn phải tính chung 1 tổng : for i:=m to n do if (i mod 3=0) or (i mod 5=0) then t:=t+i;