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

Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными

22.05.2014, 13:47. Показов 972. Ответов 1
Метки нет (Все метки)

Где ошибка

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program ffwrewre4;
uses crt;
const n=20;
var a:array[1..n] of integer;
i,m:integer;
begin
clrscr;
randomize;
for i:=1 to n do begin
a[i]:=random(10);
write(a[i]:3);
end;
writeln;
For i:=1 to N do begin If odd(i) and odd(m[i]) then Writeln(m[i]);
readln;
end.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.05.2014, 13:47
Ответы с готовыми решениями:

Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными.

Вывести элементы массива с нечетными номерами, являющиеся нечетными
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными.

Задан массив x натуральных чисел из 20 элементов. Удалить из него элементы, являющиеся удвоенными нечетными числами
Сделал вот такую программу: #include <iostream> using namespace std; int main() {...

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

1
1646 / 1075 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
22.05.2014, 15:40 2
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными

Добавлено через 1 минуту
В моем варианте нет никаких Bigin-ов между do и if в пред-пред-последней строке.

Добавлено через 1 минуту
Мда, ошибка на ошибке... массив у меня "m", а не "а".

Добавлено через 2 минуты
Что бы правильно переписать программу - надо хоть немного понимать Паскаль, а "тупое" ctrl+c и ctrl+v до добра не доведёт!
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
const n=20;
var m:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do begin
m[i]:=random(10);
write(m[i]:3);
end;
writeln;
For i:=1 to N do If odd(i) and odd(m[i]) then Writeln(m[i]);
readln;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.05.2014, 15:40
Помогаю со студенческими работами здесь

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

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

Одномерный массив. Вывести его элементы сначала с четными, потом нечетными номерами
Дан целочисленный массив A размера N.переписать в новый массив В того же размера вначале все...

Вывести на экран элементы массива в два столбика: в первый - элементы с нечетными номерами, во второй - элементы с четными номерами.
Заполнить массив различными действительными числами, случайно выбираются из указанного промежутка....


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

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

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