помогите пожалуйста по информатике

C++
include lt;iostreamgt;
using namespace std; 
int main()
 
     string str; 
     cin gt;gt; str; 
     if(str.find("0000000")!=-1 str.find("1111111")!=-1) 
           cout lt;lt; "YES";
     else 
           cout lt;lt; "NO"; 





PascalABC.NET

var
 s,a,b:string;
begin 
read(s); 
a:='1111111'; 
b:='0000000'; 
if (pos(a,s)gt;0) or (pos(b,s)gt;0) then 
                        writeln('YES') 
else writeln('NO'); 
end.