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

Одномерный массив. Вывести его элементы с четными номерами в порядке возрастания номеров

29.03.2012, 22:02. Показов 2126. Ответов 9
Метки нет (Все метки)

Дан масив А размера N(N-четное число). Вывести его элементы с четными номерами в порядке возрастания номеров А2, А4,А6,…А N.Условный оператор не использоватью
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.03.2012, 22:02
Ответы с готовыми решениями:

Одномерный массив. Вывести его элементы с четными номерами в порядке возрастания номеров
Дан масив А размера N(N-четное число). Вывести его элементы с четными номерами в порядке...

Дан массив. Вывести его элементы с четными номерами в порядке возрастания номеров
Дан масив А размера N(N-четное число). Вывести его элементы с четными номерами в порядке...

Вывести вначале элементы массива с нечетными номерами в порядке возрастания номеров, затем - элементы с четными в порядке убывания номеров
дан массив А размера N.вывести вначале элементы с нечетными номерами в порядке возрастания...

Вывести элементы массива с четными номерами в порядке возрастания номеров
решите пожалуйста.Дан массив A размера N (N — четное число). Вывести его элементы с четными...

9
3028 / 1914 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
29.03.2012, 22:13 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Uses crt;
Var
a: Array[1..100] of Integer;
n,i: Integer;
Begin
Writeln('Введите N: '); Readln(n);
Writeln('Исходный массив:');
For i:=1 to n do
begin
 a[i]:=Random(100);
 Write(a[i]:5);
end;
Writeln;
Writeln('Полученный массив: ');;
For i:=1 to n do
begin
Inc(i);
Write(a[i]:5);
end;
Readln
End.
1
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 70
29.03.2012, 22:19  [ТС] 3
а можно без inc решить
0
3028 / 1914 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
29.03.2012, 22:24 4
Вместо Inc(i) поставьте i:=i+1;
1
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 70
29.03.2012, 22:46  [ТС] 5
так она работает неправильно....нужно только четные выводить, а выводит все
0
1404 / 646 / 135
Регистрация: 11.08.2011
Сообщений: 2,299
Записей в блоге: 2
29.03.2012, 22:48 6
людиии.... изменять переменную внутри цикла for - очень неприлично! да и не всякий компилер пропустит это! уж лучше while возьмите.
1
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 70
29.03.2012, 22:50  [ТС] 7
так как ее правильно решить
0
1404 / 646 / 135
Регистрация: 11.08.2011
Сообщений: 2,299
Записей в блоге: 2
29.03.2012, 22:51 8
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var a: array [1..100] of longint;
    i, n: longint;
begin
read (n);
for i:= 1 to n do
 read (a[i]);
 
i:= 0;
 
while i<n do
 begin
  i:= i + 2;
  write (a[i],' ');
 end;
 
end.
1
0 / 0 / 0
Регистрация: 15.03.2012
Сообщений: 70
29.03.2012, 23:07  [ТС] 9
а можно по-подробнее расписать
0
1404 / 646 / 135
Регистрация: 11.08.2011
Сообщений: 2,299
Записей в блоге: 2
29.03.2012, 23:22 10
Alesia, что это значит? комментарии поставить?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.03.2012, 23:22
Помогаю со студенческими работами здесь

Вывести его элементы с нечетными номерами в порядке возрастания номеров А2, А4,А6,…А N.
2.Дан целочисленный масив размера N. Удалить из массива все одинаковые элементы, оставив их первые...

Массив. Вывести элеметы с нечётными номерами в порядке убывания номеров
дан массив А размера N (N нечётное число). Вывести его элеметы с нечётными номерами в порядке...

Вывести элементы массива с четными номерами в порядке возрастания номеров
Данный массив А размера N (N - четное число). Вывести его элементы с четными номерами в порядке...

Вывести элементы массива с нечетными номерами в порядке возрастания номеров
Дан массив A размера N. Вывести вначале его элементы с нечетными номерами в порядке возрастания...


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

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

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