блок електричного живлення;
■ материнська плата, на якій знаходяться процесор, оперативна пам’ять, звукова, відео та мережна карти;
■ допоміжні відділення, в яких знаходяться вінчестер, пристрій для читання та запису дисків;
■ передня панель, на якій знаходяться кнопки ввімкнення та перезавантаження, світлові індикатори (лампочки), порти для USB підключень, навушників, мікрофона та ін. Слід зауважити, що порти (гнізда) для під’єднання кабелю живлення та більшості пристроїв знаходяться на задній стінці системного блоку
Если будете сдавать в тестирующей системе, то вместо 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.