Задать вопрос
2 марта, 14:58

Заполните массив с четным количеством элементов случайными числами и выполните реверс отдельно для первой и второй половины массива

ПаскальABCnet

+1
Ответы (1)
  1. 2 марта, 16:12
    0
    Const nx=30; var n, i, k, t, j, kp : integer; p, pp: real; b:array[1 ... nx] of integer; beginReadln (n) ; if n mod 2 = 0 then beginp: = n/2; k:=round (p) ; pp: = k/2; kp:=round (pp) ; for i:=1 to n do beginb[i]:=random (98) - 25; write (b[i]:3) ; end; writeln; for i: = k downto 1 do beginj:=j + 1; t:=b[j]; b[j]:=b[i]; b[i]:=t; if i - kp = 1 then break; end; writeln; j:=k; for i: = n downto k+1 do beginj:=j + 1; t:=b[j]; b[j]:=b[i]; b[i]:=t; if i - (kp+k) = 1 then break; end; for i:=1 to n do write (b[i]:3) ; endelsewriteln ('Введено не правино') ; end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Заполните массив с четным количеством элементов случайными числами и выполните реверс отдельно для первой и второй половины массива ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1. Возвести в квадрат все элементы массива A. Размер массива и значения элементов массива - произвольные. 2. Увеличить на 4 все элементы в первой половине массива A (считать, что в массиве чётное число элементов).
Ответы (1)
С помощью Паскаля: 1. Заполните массив случайными числами в интервале [0; 100] и подсчитайте отдельно среднее значение всех элементов, которые меньше 50, и среднее значение всех элементов, которые больше или равны 50. 2.
Ответы (1)
Хотя бы 3-4 задачи! 1) Дан одномерный целочисленный массив размерностью N. Найдите количество элементов, которые кратны 3 (5). 2) Дан одномерный целочисленный массив А, состоящий из N элементов. Найти сумму всех четных элементов массива.
Ответы (1)
1) Найти сумму отрицательных элементов массива целых чисел. Размерность массива 10. Заполнение массива осуществить случайными числами от - 20 до 20. 2) Найдите сумму чётных элементов массива целых чисел. Размерность массива 20.
Ответы (1)
Уровень C. Напишите программу, которая заполняет массив из N = 10 случайными числами в диапазоне [10,50], выводит его на экран, а затем выполняет реверс отдельно первой и второй половин массива.
Ответы (1)