Сформировать дерево заданной структуры.
SHKOLA
doska. txt
klass. txt
2. Скопировать из каталога SHKOLA файлы в каталог KLASS с теми же
именами.
3. Слить в каталоге KLASS файлы в один, результат записать в каталог
SHKOLA с именем zavuch. txt.
4. Просмотреть содержимое файла zavuch. txt.
5. Установить файлу zavuch. txt атрибут «только чтение».
6. Получить графическое представление полученной структуры.

в системе ascii 1 символ кодируется 1 байтом, в юникоде 2 (ну так, к слову)

текст наш состоит из 30 символов (пробелы и знаки припинания тоже считаем), значит он занимает 30 байт = 240 бит

uses graphabc,crt; const t=500;

beginsetwindowsize (600, 600); setpencolor (clblack); setbrushcolor (clblack); rectangle (45, 45, 105, 225 ); setpencolor (clred); setbrushcolor (clred); circle (75, 75, 25); setpencolor (clyellow); setbrushcolor (clyellow); circle (75, 130, 25); setpencolor (clgreen); setbrushcolor (clgreen); circle (75, 185, 25); setpencolor (clblack); setbrushcolor (clblack); rectangle (70, 225, 80, 300); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25);

repeatsetbrushcolor (cldkgray); circle (75, 185, 25); setbrushcolor (clred); circle (75, 75, 25); delay(t); setbrushcolor (cldkgray); circle (75, 75, 25); setbrushcolor (clyellow); circle (75, 130, 25); delay(t); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25); delay(t); until keypressed;

end.

к чёрту на куличики

выражение “у черта на куличках”  – начнем с того, что никакого слова кулички в языке нет. от кулича  выйдут куличики, от кулика — кулички. на самом же деле не на кулички надо посылать, а на кулижки. вот тогда справедливость восторжествует, и мы сможем приступить к объяснению этого истинно оборота.кулиги и кулижки были известными и весьма употребительными словами на севере россии. когда хвойный лес «ослабевает», там появляются прогалины, поляны. на них мгновенно начинают расти трава, цветы и ягоды. эти лесные острова и назывались кулигами. еще с языческих времен на кулигах совершались жертвоприношения: жрецы закалывали оленей, овец, телок, жеребцов, все наедались досыта, напивались допьяна.когда же пришло на русь христианство и стало оно теснить язычество, пришел на кулигу крестьянин, поставил избу, стал сеять рожь, ячмень, появлялись целые деревенские артели. когда же жить станови лось теснее, уходили от стариков дети и племянники, да порой так далеко, что и вести достигать переставали, жили, как  у черта на куличках.

другая версия:

фразеологизм у черта на куличках  это: страшно далеко, где-то в дикой глуши. общий смысл слов понятен каждому, а вот что такое «кулички», не знает почти никто.

кулички  – испорченное финского корня слово, «кулиги», «кулижки», давно вошедшее в речь. так на севере назывались лесные полянки, лужки, болотца. здесь, в лесистой части страны, поселенцы далекого прошлого все время в лесу «кулижки» – площадки для распашки и покоса.

в старых грамотах постоянно встречается такая формула: «и вся та земля, покуда топор ходил и коса ходила». земледельцу часто приходилось на свою ниву отправляться в страшную глушь, на самые дальние «кулижки», хуже ближних разработанные, где, по тогдашним суеверным представлениям, в болотах и буреломах водились и лишние, и черти, и всякая лесная нечисть.

так и получили обычные слова свое второе, переносное значение: далеко, на краю света.

var a,b,c: array [1..100,1..100] of integer;

as,bs,cs,i,j: integer;

begin

  sb: =1;

  for i : = 1 to n do

        for j: = 1 to n do

        begin

            if a[i,j]< 0 then sa: =sa+a[i,j];

          if b[i,j]> 0 then sb: =sb*b[i,j];

            if j=3 then sc: =sc+c[i,j];

        end;

    writeln(sa,sb,sc);

end.