Что такое таблица типа «объект-объект»?

1) D:\ Литература \ 20 Век \Том 1.
Поднялись на 1 уровень вверх = D:\ Литература\ 20 век
Создали подкатолог Шолохов = D:\ Литература \ 20 век \ Шолохов
Перемесили файл том1 в подкаталог Шолохов =
D:\ Литература \ 20 век \ Шолохов\ Том1.

2) Начали в каталоге \Отчет
поднялись на один уровень вверх = \..\ Отчет
Спустились на 2 уровня вниз и оказались в C:\Школа\Дежурство\График
значит с последних каталогов поднимемся на 2 уровня вверх и получаем C:\Школа
Значит изначально путь был C:\Школа\Отчет

3) По аналогии с задачей под №1 :
D:\Фото\2012\Общая
D:\Фото\2012
D:\Фото\2012\9 Класс
D:\Фото\2012\9 Класс\Общая

Как я понял, вам необходимо было исправить ошибки в коде. Если это так, то
Program ddd;
var tg, f:real;
x:integer;
begin
readln (x);
tg := sin(x)/cos(x);
if x<=-3.14 then f:=ln(cos(5*x)-2*x)+1;
if x>-3.14 then f:=0.35*tg*(0.1*x)-exp(ln(2*2.7)*(-0.1*x));
writeln (f);
end.

Обратите внимание, что вещественные числа указываются посредством точки, а не запятой (не "0,1", а "0.1"). Функция cos должна принимать какой-либо аргумент, ибо сама по себе она не представляет никакого значения (f:=ln(cos*(5*x)-2*x)+1; -- здесь вы cos * на выражение, что неверно). Приравнивать переменные одих типов к значению других -- ошибка (f:integer; - значение типа интеджер. ln(cos(5*x)-2*x)+1; - функция ln возвращает значение типа real. Следовательно, f не может присвоить возвращаемое значение функции ln).