Составить алгоритм перехода пешехода через дорогу

1. подойти к проезжей части. 2. если светофора нет, перейти к 6 3. если на светофоре зеленый свет, перейти к 6. 4. немного подождать. 5. перейти к 3. 6. если дорога свободна, перейти к 9 7. немного подождать. 8. перейти к 6. 9. перейти дорогу.

Буквы. ударные или безударные слоги.  сам знаки могут выглядеть как угодно, например, точка-тире.   на ум приходят пдд. напр, на светофоре знак красного человечка "стой", зеленого "иди" и т.д.

function max (x,y : longint) : longint; begin  if x> y then max: =x else max: =y; end; var k : longint; s : string; begin  readln(s);   while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do

begin    k: =k+1;

    delete(s,max(max(pos('.',s),pos('! ',('? ',); end;   writeln(k); end.