Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

В массиве четное количество элементов поменять местами в массиве 1 с последним 2 с предпоследним и т.д

10-11 класс

Kuchalesha 21 сент. 2016 г., 14:03:48 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Anatoljkee2011awp
21 сент. 2016 г., 17:03:23 (7 лет назад)

Const NN=50;
var
a:array [1..NN] of integer;
i,n,k:integer;
begin
  write('Введите кол-во эл-тов массива: ');
  readln(n);
  for i:= 1 to n do
  begin
    a[i]:=random(50);
    write(a[i],' ');
  end;
  writeln;
  for i:= 1 to n div 2 do
  begin
    k:=a[i];
    a[i]:=a[n-i+1];
    a[n-i+1]:=k;
  end;
  for i:= 1 to n do write(a[i],' ');
end.

Ответить

Другие вопросы из категории

перевести В двоичную систему счисления : А9 в 16 сист.счисления, 737 в 8 сист.счис., 101 в 10 сист.счисления.и выполнить сложение

вычитание,умножения,деление с любыми двумя результатами

Паскаль

вводится последовательность из n целых чисел. определить, содержит ли последовательность хотя бы два равных соседних числа (a_i=a_(i+1)) (без массива)


Читайте также

Задан одномерный массив размером 40. Определите количество элементов массива и среднее арифметическое значение этих элементов, которых больше заданного

числа 7 и меньше 10. Вывести количество элементов массива и среднее арифметическое значение этих элементов, которых больше заданного числа 7 и меньше 10 на монитор

Выполнить в Pascal

.....
В массиве 3 на 6 поменять местами элементы второго и пятого столбца строки.



Вы находитесь на странице вопроса "В массиве четное количество элементов поменять местами в массиве 1 с последним 2 с предпоследним и т.д", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.