Дана последовательность натуральных чисел 1,2,3,...,N(1<=N<=1000). Необходимо сначала расположить в обратном порядке часть этой последовательности от элемента с номером А до элемента с номером В, а затем о С до D (А<В; С<D; 1<=A,B,C,D<=N).
Входные данные
вводятся натуральные числа N,A,B,C,D.
Выходные данные
требуется вывести полученную последовательность
Примеры
9 2 5 6 9
выходные данные
1 5 4 3 2 9 8 7 6
Помогите пожалуйста, очень срочно!!
Answers & Comments
Ответ:
var i,n,a,b,c,d:integer;
begin
read (n,a,b,c,d);
for i:=1 to a-1 do write (i,' ');
for i:=b downto a do write (i,' ');
for i:=b+1 to c-1 do write (i,' ');
for i:=d downto c do write (i,' ');
if d <> n then for i:=d+1 to n do write (i,' ');
end.
Объяснение:
var i,n,a,b,c,d:integer;
begin
write ('n = ');
readln (n);
write ('a = ');
readln (a);
write ('b = ');
readln (b);
write ('c = ');
readln (c);
write ('d = ');
readln (d);
for i:=1 to a-1 do write (i,' ');
for i:=b downto a do write (i,' ');
for i:=b+1 to c-1 do write (i,' ');
for i:=d downto c do write (i,' ');
if d <> n then for i:=d+1 to n do write (i,' ');
end.