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.

16 tháng 12 2022

#include <bits/stdc++.h>

using namespace std;

int a,b;

int main()

{

cin>>a>>b;

for (int i=a; i<=b; i++)

if (i%6==0) cout<<i<<" ";

}

25 tháng 2 2022

tick cho e dc ko

22 tháng 12 2021

#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) t=t+i;

cout<<t;

return 0;

}

30 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

int t,i;

int main()

{

t=0;

for (i=1; i<=20; i++)

if ((i%3==0) and (i%2==1)) t=t+i;

cout<<t;

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long i,n,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

if (i%2==1 && i%5==0) dem++;

cout<<dem;

return 0;

}

25 tháng 2 2022

Đó là C hoặc C++ rồi làm pascal cơ mà

23 tháng 12 2021

Bài 2: 

uses crt;

var x,i,n,dem:integer;

begin

clrscr;

readln(n);

dem:=0;

for i:=1 to n do 

begin

readln(x);

if x mod 2=0 then inc(dem);

end;

writeln(dem);

readln;

end.

23 tháng 12 2021

Bài 1 đâu ạ

 

31 tháng 8 2018

Var f1, f2: text;

  Tong, m, n, i: integer;

Begin

  assign(f1, ‘DULIEU.TXT’);

  reset(f1);

  assign(f2, ‘KETQUA’);

  rewrite(f2);

  Tong;= 0;

  read(f1, m, n);

  for i:= m to n do

  if i mod 2 = 0 then Tong:= Tong+i;

  write(f2, Tong);

  close(f1);

  close(f2);

End.

7 tháng 4 2019

Var f1, f2: text;

  Tong, m, n, i: integer;

Begin

  assign(f1, ‘DULIEU.TXT’);

  reset(f1);

  assign(f2, ‘KETQUA’);

  rewrite(f2);

  Tong;= 0;

  read(f1, m, n);

  for i:= m to n do

  if i mod 2 = 0 then Tong:= Tong+i;

  write(f2, Tong);

  close(f1);

  close(f2);

End.