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;
long long a,b,t,i;
int main()
{
cin>>a>>b;
t=0;
for (i=a; i<=b; i++)
if ((i%3==0) or (i%5==0)) t=t+i;
cout<<t;
return 0;
}
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 30 do
if i mod 3=0 then t:=t+i;
writeln(t);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
if (i%3==0) t+=i;
cout<<t;
return 0;
}
program tinh_tong;
uses crt;
var i,N:byte;
S:integer;
begin
writeln('Nhap so N='); readln(N);
i:=1; S:=0;
while i<=N do
begin
if (i mod 3=0) and (i mod 2=1) then S:=S+i;
i:=i+1;
end;
writeln('Tong S=',S);
readln
end.
nếu được thì mong bạn kiểm tra lại trên phần mềm dùng mình nhé, do ko có nên cx chẳng kiểm tra được. Thế nên sai thì thông cảm dùng mình nha
Hãy viết chương trình Pascal thực hiện các công việc sau (đặt tên program tên mình)
program songuyenduong;
var
n, i : integer;
sum : integer;
begin
writeln('Nhap vao so nguyen duong N: ');
readln(n);
sum := 0;
for i := 1 to n do
begin
if i mod 5 = 0 then
sum := sum + i;
end;
writeln(sum);
end.
Chọn B nhé bạn
B nha