Đăng nhập để hỏi chi tiết
22
14
Viết code C++, PYTHON, Pascal
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
1371
1722
`\text{Pascal}`
program vaccin;
var m, n, i, j, count, max_count, sum, k: longint;
a: array[1..1000000] of longint;
begin
readln(m, n);
for i := 1 to n do read(a[i]);
count := 0;
max_count := 0;
for i := 1 to n do
begin
sum := 0;
for j := i to n do
begin
sum := sum + a[j];
if sum mod m = 0 then
begin
count := count + 1;
if (j - i + 1) > max_count then
max_count := (j - i + 1);
end;
end;
end;
writeln(count);
writeln(max_count);
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
44
13
#include <bits/stdc++.h>
#define max 1000002
#define ll long long
#define for1(i,a,b) for(ll i=a;i<=b;i++)
#define read(x) cin>>x
#define write(x) cout<<x<<"\n"
#define v(a) vector<ll> a
#define min1(x,y) ((x)<(y) ? (x):(y))
#define max1(x,y) ((x)>(y) ? (x):(y))
using namespace std;
ll m,n;
v(a);
ll dem=0,m1=0;
int main() {
read(m);
read(n);
a.resize(n);
for1(i,0,n-1)
read(a[i]);
v(b);
b.resize(n+1,0);
for1(i,1,n)
b[i]=b[i-1]+a[i-1];
for1(i,0,n-1) {
for1(j,i+1,n) {
ll s=b[j]-b[i];
if (s%m==0) {
dem++;
m1=max1(m1,j-i);
}
}
}
write(dem);
if (dem>0)
write(m1);
return 0;
}
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
22
532
13
giúp
22
532
13
https://hoidap247.com/cau-hoi/7673082
22
532
13
:P
22
532
13
thề sẽ chọn hay nhất
22
532
13
60 điểm đó
22
532
13
oki
22
532
13
uk
22
532
13
seo zậy :P