var s:ansistring; t:qword;n,i,k,m:longint;a:array[0..1000000] of longint;
begin
assign(input,'SUBSTR.INP');reset(input);
assign(output,'SUBSTR.OUT');rewrite(output);
readln(n);read(s);close(input);m:=length(s);t:=0;k:=0;
for i:=1 to m do
if s[i]='1' then begin inc(k);a[k]:=i;end;a[0]:=0;a[k+1]:=m+1;
for i:=1 to k-n+1 do
t:=t+(a[i]-a[i-1])*(a[i+n]-a[i+n-1]);
write(t);close(output);
end.

acc phụ của hbphuc2009 🙁

i love lynn 😊

con cu

Hoàng Nữ Ngọc Vinh

Người đẹp trai nhất thế giới không ai sánh bằng:)

sdadwqwe

SigmaNotFound : https://www.youtube.com/shorts/_aaoIQqBMHs

include <iostream>

using namespace std;
int main(){
cout<<"hello cpp\n";
}

Ton is a dedicated student with passion for learning and growth, demonstrating a strong work ethic and commitment to excellence. Ton, a student, is passionate about computer science and technology. He enjoys sports, reading, and exploring new books. With a strong work ethic, diverse interests, and a friendly personality, he is a well-rounded individual.

hi