Можно, т. к. в ней есть каталоги и подкаталоги. Корень - это корневой каталог, ветви это стрелочки, а листья - подкаталоги
<em>var a, b, n, i:integer;</em>
<em>begin</em>
<em> b:=-1;</em>
<em> for i:=1 to 10 do</em>
<em> begin</em>
<em> a:=a+b;</em>
<em> b:=b+3;</em>
<em> end;</em>
<em> writeln (a);</em>
<em>end.</em><span><em> </em></span>
Program rasst;
<span>var norma, vsego: real; </span>
<span>den: integer; </span>
<span>begin </span>
<span>norma:=10; </span>
<span>vsego:=10; </span>
<span>den:=2; </span>
<span>while den<8 do begin </span>
<span>norma:=1.1*norma; </span>
<span>vsego:=vsego+norma; </span>
<span>den:=den+1 </span>
<span>end; </span>
<span>writeln('Общий пробег=',vsego) </span>
<span>end.</span>