0 / 0 / 0
Регистрация: 26.01.2015
Сообщений: 14
1

Если очередной элемент массива чётный, то прибавь к нему первый, если нечётный — прибавить последний

05.05.2015, 04:21. Показов 2942. Ответов 1
Метки нет (Все метки)

Дан одномерный массив состоящий из n элементов. Если очередной элемент чётный, то прибавь к нему первый, если нечётный - прибавить последний. Первый и последний элементы не изменять.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.05.2015, 04:21
Ответы с готовыми решениями:

Если элемент массива четный — прибавить к нему первый, если нечетный — последний элемент
здравствуйте еще раз)) Спасибо за то что помогли с прошлой задачей огромной)) можно еще одну)...

Для двумерного массива. Если элемент четный, то прибавить к нему первый, если нечетный — последний элементы массива
Для двумерного массива. Если элемент четный, то прибавить к нему первый, если нечетный — последний...

Если элемент массива четный, то прибавить к нему первый, если нечетный - последний элементы массива
Написать программу изменения элементов массива. Если элемент четный, то прибавить к нему первый,...

Найти наименьший чётный элемент массива, если такого нет, то вывести первый элемент; подсчитать сумму нечётных элементов
Сделайте так что бы размер массива водился с клавиатуры Добавлено через 1 минуту Найдите...

1
Почетный модератор
64275 / 47574 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
05.05.2015, 10:36 2
Лучший ответ Сообщение было отмечено Дмитрий98 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses crt;
const nmax=100;
var a:array[1..nmax] of integer;
    n,m,i:byte;
begin
clrscr;
randomize;
repeat
write('Размер массива А от 3 до ',nmax,' n=');
readln(n);
until n in [3..nmax];
writeln('Исходный массив');
for i:=1 to n do
 begin
  a[i]:=random(50);
  write(a[i]:4)
 end;
writeln;
writeln('Измененный массив');
for i:=1 to n do
 begin
  if i in [2..n-1] then
  if odd(a[i]) then a[i]:=a[i]+a[n]
  else a[i]:=a[i]+a[1];
  write(a[i]:4);
 end;
readln
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.05.2015, 10:36
Помогаю со студенческими работами здесь

Поменять местами первый и последний элемент массива, если выполняется условие
Всем доброго вечера! Столкнулся с проблемой при решении данного задания (Задание: Если в массиве...

Дано целое число. Если оно является положительным, то прибавить к нему 1; если нулевым, то заменить его на 10
Дано целое число. Если оно является положительным, то прибавить к нему 1; если нулевым, то заменить...

Строка: если в строке больше 2 цифр, то удалить первый и последний элемент строки
Дан массив, если в строке больше 2 цифр то удалить первый и последний элемент строки, иначе...

Дано целое число. Если оно является положительным, то прибавить к нему 1
1. Дано целое число. Если оно является положительным, то прибавить к нему 1; в противном случае не...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru