сервис вопросов и ответовВ массиве А(10) удалить все четные элементы, стоящие на нечетных местах
10-11 класс|
|
Ученик997
17 дек. 2013 г., 10:25:53 (10 лет назад)
KKsenia98
17 дек. 2013 г., 11:13:19 (10 лет назад)
var
i,n:integer;
a:array of integer;
begin
SetLength(a,10);
write('Исходный массив: ');
for i:=0 to 9 do
begin
a[i]:=random(10);
write(a[i],' ');
end;
writeln;
write('Преобразованный массив: ');
for i:=0 to 9 do
begin
if not((i mod 2=0) and (a[i] mod 2=0)) then
begin
a[n]:=a[i];
n:=n+1;
end;
end;
SetLength(a,n);
for i:=0 to n-1 do
write(a[i],' ');
end.
Dashakosareva
17 дек. 2013 г., 13:19:15 (10 лет назад)
Т.е. массив станет не на 10 элементов, а, допустим, на 6. Да?
375445615456
17 дек. 2013 г., 16:25:34 (10 лет назад)
Был: 1 1 2 1 2 1 1 1 1 1. Станет: 1 1 1 1 1 1 1 1
Dark017
17 дек. 2013 г., 20:20:26 (10 лет назад)
Хорошо, но тогда придется использовать переопределение размера массива. Сейчас буду делать
Ответить
Другие вопросы из категории
Скорость передачи данных через ADSL‑соединение равна 32000 байт/c.
Определите размер файла, который будет передан через 1 минуту. Ответ выразите в Кбайтах.
В ячейке D5 электронной таблицы записана формул. Эту формулу скопировали в ячейку C4. В результате знание в ячейке C4 вычисляется по формуле 3x+y, где x
- значение в ячейке C22, а y - значение в ячейке D22. Какая формула могла быть записана в ячейке D5?
Секретное сообщение состояло из 32 строк. В каждой строке вместе с пробелами по 64 символов. Сообщение содержало 1792 байт информации. Какова мощность
алфавита (количество символов), которым было написано секретное сообщение.
Читайте также
Дана квадратная матрица размера N. Если сумма элементов по главной диагонали больше суммы элементов на побочной диагонали, то заменить элементы стоящие на
четных местах в строке на “ * ”, а элементы стоящие на нечетных местах в строке на ноль.
составьте программу,которая запрашивает значение элементов одномерного массива A,состоящего из 10 элементов,формирует и выводит на экран в строку данный
массив.Найти сумму определённого элемента;количество элементов,стоящих на нечетных местах;произведение элементов,кратных 5.
дано массивы A(N1,N1),B(N2,N2),C(N3,N3). найти в каждой строке исходного массива наименьший элемент и переставить его с элементом стоящим на главной
диагонали. нахождение в каждой строке массива наименьшего элемента и его перестановку с элементом стоящим на главной диагонали оформить в виде подпрограммы
Задача Pascal
Найти наименьшие элементы в каждом столбце матрицы Х(5,5) и переписать их в одномерных массив А.В массиве А вычислить сумму элементов,стоящих на четных местах и произведение элементов,стоящих на нечетных местах.Массив А,сумму и произведение вывести на экран
Вы находитесь на странице вопроса "В массиве А(10) удалить все четные элементы, стоящие на нечетных местах", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.