Если будете сдавать в тестирующей системе, то вместо string, лучше использовать массив char - работает быстрее.
var n,i,k,p,mx,mxj: integer;
s: array[1..100000] of char;
begin
readln(n);
for i:=1 to n do read(s[i]);
k:=0; p:=0;
mx:=0; mxj:=0;
for i:=1 to n do
begin
if s[i]='G' then k:=k+1
else
begin
if p=1 then
begin
p:=0;
if s[i-1]='G' then
if (k>mxj) then mxj:=k;
k:=0;
end
else
begin
if k>0 then p:=1;
if k>mx then mx:=k;
end;
end;
end;
if mx>mxj then k:=mx+1
else k:=mxj+1;
if k=1 then k:=0;
writeln(k);
end.
Объяснение:
рлллолшчллы пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук пук тра3 я не знаю почему у тебя так же когда ты один ты постоянно пишешь звонишь хотя бы тоже поела и все больше ничего я не знаю почему у тебя р от меня надо было с 33333месяцев Тогда и 44беседовать
Широке використання Інтернету породжує не лише нові можливості, а й низку проблем щодо ефективного захисту та охорони прав інтелектуальної власності.
Перенесення зростаючої кількості літературних творів, фільмів, комп’ютерних програм у цифрове середовище породжує реальну загрозу зміни та фальсифікації цих творів, створення дешевих і високоякісних копій, їх широкого розповсюдження з порушенням авторських прав. Існує також реальна загроза підробки знаків для товарів і послуг, поширення комп’ютерного піратства тощо.
Основні види інтернет-піратства: аудіопіратство – копіювання та розповсюдження копій музичних композицій; відеопіратство – розповсюдження копій фільмів або телепередач на дисках, касетах та шляхом копіювання через комп’ютерні мережі; піратство літературних творів – незаконне розповсюдження авторських творів (із появою електронних бібліотек, що безкоштовно надають доступ усім бажаючим до текстів літературних творів, їх діяльність почала розглядатися деякими авторами як піратство); піратство комп’ютерних ігор – нелегальне поширення комп’ютерних ігор; піратство програмного забезпечення – нелегальне копіювання та розповсюдження програмних продуктів на дисках та через комп’ютерні мережі, що включає, також, зняття різноманітних систем захисту від нелегального використання.