Составить легкую программу! 
Зеркально отразить последовательность в одномерном массиве.

Т.е. Задаем последовательность, вводим границы "зеркала" - х и у. И зеркально отражаем.
Пример:12345678910
х=5

у=8

Вывод:12348765910.
Очень буду блгодарна! 

 

 

*обращайся)

что-то оно не так работает как надо

http://i60.fastpic.ru/big/2013/1024/54/75e115e7ac46dabd74b793244def4754.png А?

а вариант a=(4,5,8,15,2,6,7) ; x=3; y=6 ?

var a: array [1..10] of integer; i, x, y, t: integer;begin randomize; for i := 1 to 10 do a[i] := random(99); write('X, Y = '); read(X, Y); writeln; for i := 1 to 10 do write(i:3); writeln; for i := 1 to 10 do write(a[i]:3);

for i := 0 to abs(x-y+1) div 2 do begin t := a[x+i]; a[x+i] := a[y-i]; a[y-i] := t; end; writeln; for i := 1 to 10 do write(a[i]:3);end.