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.

22 tháng 11 2019
#include<bits/stdc++.h> using namespace std; int main(){ int n, m; cin>>n>>m; int A[n+1]={}, d[n+1]={}; for(int i=1; i<=n; i++){ cin>>A[i]; d[i]=A[i]+d[i-1]; } int vt=m, res=d[m]; for(int i=m+1; i<=n; i++){ if(d[i]-d[i-m]>res){ vt=i; res=d[i]-d[i-m]; } } for(int i=vt-m+1; i<=vt; i++){ cout<<A[i]<<' '; } }
24 tháng 11 2019

Mình học pascal bạn ơi, thế này khó hiểu quá

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,t;

int main()

{

cin>>n;

t=0;

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

{

cin>>x;

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

}

cout<<t;

return 0;

}

24 tháng 2 2022

các bạn ơi chỉ mình với

 

24 tháng 7 2023

cứu em với mn còn 30p cuối thôi

7 tháng 3 2023

Var a:array[1..200] of integer;

i,n:integer;

s:longint;

Begin

Write('Nhap so luong so ');readln(n);

For i:=1 to n do

Begin

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

End;

Writeln('Cac so vua nhap la ');

For i:=1 to n do write(a[i]:6);

Writeln;

Write('Tong la ');

For i:=1 to n do s:=s+a[i];

Write(s);

Readln;

End.

23 tháng 10 2016

minh ghi bị nhầm cho dãy A gồm N số nguyên a1, a2...aN . trong dãy A có bao nhiêu phần tử là số lẻ , tính tống các phần tử lẽ đó.

23 tháng 10 2016

var s,a1,an,n,c:integer;

begin

s:=0;

c:=0

write('nhap a1,an ');

read(n);

for i:=a1 to an do

if i mod 2=0 then

begin

s:=s+i;

c:=c+1;

end;

write ('so so thoa ycdb la : ',c);

write ('tong so thoa ycdb la : ',s);

readln

end.

 

#include <bits/stdc++.h>

using namespace std;

long long a[1000],n,i;

int main()

{

cin>>n;

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

cin>>a[i];

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

if (a[i]==0) 

{cout<<i; break; }

return 0;

}