Е:\видеозапись.avi
Е:\график.xIs
Е:\ИЗОБРАЖЕНИЯ\аквариум.bmp
Е:\ИЗОБРАЖЕНИЯ\ФОТО\Бия.jpeg
Е:\ИЗОБРАЖЕНИЯ\ФОТО\Катунь.jpeg
Е:\ТЕКСТЫ\буква.txt
Е:\ТЕКСТЫ\онегин.doc
Е:\мелодия.mp3
Е:\презинтация.ppt
Думаю, что эта программа подойдёт:
var count,i,n,min,book: Integer;
a: array[0..100] of Integer;
begin
min:=1000;
writeln('Введите кол-во учебников');
readln(count);
dec(count);
for i:=0 to count do
begin
writeln('Введите кол-во заданий в ',i+1,' учебнике');
readln(n);
a[i]:=n;
end;
for i:=0 to count do
begin
if a[i]<min then
begin
min:=a[i];
book:=i+1;
end;
end;
writeln('Номер учебника, в котором находится наименьшее кол-во заданий: ',book);
end.
Насколько он сместился за эти три команды "Сместиться на (-5, -1) Сместиться на (3, 2) Сместиться на (3, -1)"? на (-5 +3 +3,-1 +2 -1) = (1,0).
Теперь умножаем полученные координаты на количество повторений: (3,0).
Ещё перед этим он сместился на (-4, -1), значит суммарно он сместился на (3 -4, 0 -1) = (-1, -1). И чтобы вернуться обратно, нужно сместиться на это же значение, но в противоположную сторону, то есть, на (1,1)