Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
katareva
0 / 0 / 0
Регистрация: 19.03.2016
Сообщений: 22
#1

Дан массив. Все элементы с четными номерами удвоить, с нечетными - уменьшить на 1

14.06.2016, 13:20. Просмотров 1029. Ответов 2
Метки нет (Все метки)

Дан массив. Все элементы с четными номерами удвоить, с нечетными - уменьшить на 1.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.06.2016, 13:20
Ответы с готовыми решениями:

Все элементы массива с нечетными номерами удвоить, с четными - уменьшить на 1
Дан массив из 15 элементов. Все элементы с нечетными номерами удвоить, с четными - уменьшить на 1.

Дан одномерный массив Zn. Все элементы с нечетными значениями заменить суммой элементов с четными номерами
Дан одномерный массив Zn. Все элементы с нечетными значениями заменить суммой элементов с четными...

Удвоить элементы с четными номерами и переписать их в новый массив, отсортировать
ввести с клавиатуры размерность и значения элементов линейного массива целых чисел.Удвоить элементы...

Удвоить элементы с четными номерами и переписать их в новый массив. Полученный массив отсортировать
4.Задача. Ввести с клавиатуры размерность и значения элементов линейного массива целых чисел....

Выбросить из массива А все элементы с четными номерами, а из массива В - с нечетными номерами
Выбросить из массива А все элементы с четными номерами, а из массива В - с нечетными номерами....

2
EveKS
409 / 368 / 152
Регистрация: 19.04.2016
Сообщений: 1,465
Завершенные тесты: 7
14.06.2016, 14:13 #2
Лучший ответ Сообщение было отмечено katareva как решение

Решение

Яб так попробовал:

C#
C#
1
2
3
4
5
6
            int[] int1 = new int[] { 1, 2, 3, 4, 5, 6, 7, 8 ,9 , 0};
 
            for (int i = 0; i < int1.Length; i++)
                int1[i] = (i % 2 == 0) ? int1[i] * 2 : int1[i] - 1;
            foreach (int i in int1)
                Console.WriteLine(i);


Как-то так, паскаль

В цикле переменная, можно глобальную кинуть.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var
  arr: array of integer;
 
begin
  SetLength(arr, 10);
  for var i := 0 to arr.Length - 1 do
    arr[i] := Random(1, 99);
  
  foreach var x in arr do
    Print(x);
  WriteLn();
  
  for var i := 0 to arr.Length - 1 do
  begin
    if i mod 2 = 0 then
      arr[i] *= 2
    else
      arr[i] -= 1;
  end;
  
  foreach var x in arr do
    Print(x);
end.
Немного о 0 :
if i mod 2 = 0 and i <> 0 then


"C#, для разнообразия, через функции

C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
using System;
 
namespace Test01
{
    class Program
    {
        static void Main(string[] args)
        {
            Func<int, bool> bool1 = x => x % 2 == 0;
            Func<int, bool, int> int2 = (x, y) => (y) ? x * 2 : x - 1;
            int[] int1 = new int[] { 1, 2, 3, 4, 5, 6, 7, 8 };
 
            for (int i = 0; i < int1.Length; i++) 
                int1[i] = int2(int1[i], bool1(int1[i]));
            foreach (int i in int1)
                Console.WriteLine(i);
        }
    }
}

PS
PS тема была в C#
0
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
3815 / 2496 / 2055
Регистрация: 22.11.2013
Сообщений: 6,948
14.06.2016, 15:18 #3
Pascal
1
2
for i:=1 to n do
  if Odd(a[i]) then Dec(a[i]) else a[i]:=a[i]*2;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.06.2016, 15:18

В первый массив включить элементы исходного массива с четными номерами, а во второй – с нечетными
Задан массив с количеством элементов N. Сформировать два массива: в первый включить элементы...

В первый массив включить элементы исходного массива с четными номерами, а во второй – с нечетными
1) задан массив а размерности n. сформируйте два массива в и с: в первый включить элементы...

В одномерном массиве, состоящем из n целых чисел, заменить элементы с четными номерами нулем, а элементы с нечетными номерами - 1.
В одномерном массиве, состоящем из n целых чисел, заменить элементы с четными номерами нулем, а...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru