Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
đông hồ khùng
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 13:41

#include <bits/stdc++.h>

using namespace std;

long long a,b,i,dem,s;

int main()

{

cin>>a>>b;

dem=0;

s=0;

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

if (i%2==0) 

{

dem++;

s=s+i;

}

cout<<dem<<" "<<s;

return 0;

}

Huỳnh Quốc Đại
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 13:50

#include <bits/stdc++.h>

using namespace std;

long long a,b,i,dem,s;

int main()

{

cin>>a>>b;

dem=0;

s=0;

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

if (i%2==0) 

{

dem++;

s=s+i;

}

cout<<dem<<" "<<s;

return 0;

}

Thuận An
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 13:50

#include <bits/stdc++.h>

using namespace std;

long long a,b,i,dem,s;

int main()

{

cin>>a>>b;

dem=0;

s=0;

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

if (i%2==0) 

{

dem++;

s=s+i;

}

cout<<dem<<" "<<s;

return 0;

}

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
2 tháng 8 2017 lúc 10:22

Program bt_3;

Uses crt;

Var Tong, n, i: integer;

Begin

 Clrscr;

 Writeln(‘nhap n=’);

 Readln (n);

 Tong:=0;

 For i:=1 to n do

 If I mod 2 = 0 then Tong:= Tong+i;

 Writeln(‘Tong la:’,Tong);

 Readln

End.

Võ Khắc Duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 12 2022 lúc 15:16

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

if n mod 2=0 then writeln(n,' la so chan')

else writeln(n,' la so le');

t:=0;

for i:=1 to n do

  if i mod 5=0 then t:=t+i;

writeln(t);

readln;

end.

Võ Khắc Duy
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 12 2022 lúc 15:16

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

if n mod 2=0 then writeln(n,' la so chan')

else writeln(n,' la so le');

t:=0;

for i:=1 to n do

  if i mod 5=0 then t:=t+i;

writeln(t);

readln;

end.

❤X༙L༙R༙8❤
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 5 2021 lúc 10:49

Câu 2: 

a) Mô tả thuật toán

-Bước 1: Nhập n và nhập dãy số

-Bước 2: dem←0; i←1; t←0;

-Bước 3: Nếu a[i] mod 2=0 thì dem←dem+1 và t←t+a[i];

-Bước 4: i←i+1;

-Bước 5: Nếu i<=n thì quay lại bước 3

-Bước 6: Xuất t và dem

-Bước 7: Kết thúc

Nguyễn Lê Phước Thịnh
15 tháng 5 2021 lúc 10:49

Câu 2: 

b) uses crt;

var a:array[1..100]of integer;

i,n,t,dem:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

dem:=0;

for i:=1 to n do 

 if a[i] mod 2=0 then 

begin

t:=t+a[i];

inc(dem);

end;

writeln('So so chan la: ',dem);

writeln('Tong cac so chan la: ',t);

readln;

end.

Hùng Anh Nguyễn Đăng
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 1 2022 lúc 15:59

#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;

}

Thiên Nhật
Xem chi tiết
Vương Hương Giang
14 tháng 2 2022 lúc 14:26

uses crt;

var a:array[1..100]of integer;

i,n,tc,tl,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

tc:=0;

tl:=0;

for i:=1 to n do 

  begin

if a[i] mod 2=0 then tc:=tc+a[i]

else tl:=tl+a[i];

end;

writeln('Tong cac so chan la: ',tc);

writeln('Tong cac so le la: ',tl);

t:=0;

for i:=1 to n do  

t:=t+a[i];

writeln('Tong cua day so la: ',t);

readln;

end. 

Nguyễn Lê Phước Thịnh
14 tháng 2 2022 lúc 14:32

uses crt;

var a:array[1..1000]of integer;

i,n,dem1,dem2,t1,dem3,j,kt:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

  readln(a[i]);

dem1:=0;

dem2:=0;

t1:=0;

for i:=1 to n do 

  begin

if a[i] mod 2=0 then 

begin

dem1:=dem1+1;

t1:=t1+a[i];

end;

else dem2:=dem2+1;

end;

dem3:=0;

for i:=1 to n do 

  if (a[i]>1) then 

begin

kt:=0;

for j:=2 to trunc(sqrt(a[i])) do 

  if a[i] mod j=0 then kt:=1;

if kt=0 then dem3:=dem3+1;

end;

writeln(dem1, ' ',dem2);

writeln(t1);

writeln(dem3);

readln;

end.