B1:cho dãy số nguyên A1,A2,....An(n
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.
Những câu hỏi liên quan
29 tháng 7 2021
Bài 1:
Uses crt;
var i,n,j:integer;
a,b,c:array[1..100000] of integer;
Begin
clrscr;
readln(n);
for i:= 1 to n do readln(a[i]);
for i:= 1 to n do readln(b[i]);
j:=0;
for i:= 1 to n do
Begin
inc(j);
c[j] := a[i];
inc(j);
c[j] := b[i];
end;
for i:= 1 to j do write(c[i],' ');
readln;
end.
NL
Nguyễn Lê Phước Thịnh
CTVHS
8 tháng 3 2021
Bài 1:
uses crt;
var a:array[1..1000000]of longint;
i,n,x:longint;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap x='); readln(x);
for i:=1 to n do
if a[i]<>x then write(a[i]:4);
readln;
end.
NL
Nguyễn Lê Phước Thịnh
CTVHS
10 tháng 12 2021
1:
#include <bits/stdc++.h>
using namespace std;
long long n,i,x,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
t=t+x;
}
cout<<t;
return 0;
}
NL
Nguyễn Lê Phước Thịnh
CTVHS
4 tháng 4 2022
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i;
int main()
{
freopen("dayd.inp","r",stdin);
freopen("dayd.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++)
if (a[i]>0) cout<<a[i]<<" ";
return 0;
}
NL
Nguyễn Lê Phước Thịnh
CTVHS
31 tháng 3 2022
#include <bits/stdc++.h>
using namespace std;
long long a[10000],i,n,t;
int main()
{
freopen("avg.inp","r",stdin);
freopen("avg.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
t=0;
for (i=1; i<=n; i++) t+=a[i];
cout<<fixed<<setprecision(1)<<(t*1.0)/(n*1.0);
return 0;
}
NQ
Nguyễn Quốc Đạt
CTVVIP
25 tháng 1
program SMAX;
const
MAXN = 10000000;
var
n, i: longint;
a: int64;
curSum, maxSum: int64;
f: text;
begin
assign(f, 'SMAX.INP');
reset(f);
readln(f, n);
curSum := 0;
maxSum := -1000000000000000000; { rất nhỏ }
for i := 1 to n do
begin
read(f, a);
if curSum + a > a then
curSum := curSum + a
else
curSum := a;
if curSum > maxSum then
maxSum := curSum;
end;
close(f);
assign(f, 'SMAX.OUT');
rewrite(f);
writeln(f, maxSum);
close(f);
end.
NQ
0
Đề bài yêu cầu gì?