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.

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

t=0;

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

if (a[i]%2==0 && i%2==1) t+=a[i];

cout<<t;

return 0;

}

Chọn B

6 tháng 5 2023

1) Đề chưa rõ ràng!

2) var a:array[1..1000] of real;

i,n:integer;

min:real;

begin

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

for i:=1 to n do

begin

write('Nhap so thu ',i,' = ');readln(a[i]);

end;

min:=a[1];

for i:=2 to n do

if a[i] < min then min:=a[i];

write('So nho nhat trong day la ',min:10:2);

readln

end.

19 tháng 10 2021

a:

#include <bits/stdc++.h>

using namespace std;

long long n,x,i,ln;

int main()

{

cin>>n>>x;

ln=x;

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

{

cin>>x;

ln=max(ln,x);

}

cout<<ln;

return 0;

}

a: #include <bits/stdc++.h>

using namespace std;

long long n,i,x,dem;

int main()

{

cin>>n;

dem=0;

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

{

cin>>x;

if (x%2!=0) dem++;

}

cout<<dem;

return 0;

}

D
datcoder
CTVVIP
17 tháng 10 2023

Program HOC24;

uses crt;

var i,n: integer;

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

t: longint;

begin

clrscr;

readln(n); 

t:=0;

for i:=1 to n do

begin

read(a[i]);

if (a[i] mod 2=0) and (a[i] mod 5=0) then t:=t+a[i];

end;

readln;

write(t);

readln;

end.

#include <bits/stdc++.h>

using namespace std;

long long a[10000],n,i,ln;

int main()

{

cin>>n;

ln=LLONG_MIN;

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

{

cin>>a[i];

ln=max(ln,a[i]);

}

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

if (ln==a[i]) cout<<i<<" ";

return 0;

}

10 tháng 12 2021

Chị có thể trình bày ra các bước liệt kê đc k chị. 

Chẳng hạn như 

B1: ...

B2: ...

B3: ...