Вывести нули массива, стоящие на чётных местах

@d1m0n1 · Регистрация: 24.10.2011

Студворк — интернет-сервис помощи студентам

Заполнить массив из 10 элементов, числами в диапозоне от 10 до 60. Вывести нули, стоящие на чётных местах. Накону 4 или 5 по информ.

@sannee · 24.10.2011, 23:14

Сообщение от d1m0n1

Vepsar, да правильно, молодец, а без рандома никак ?

всмысле, что без рандома никак?

@d1m0n1 · 24.10.2011, 23:15 **[ТС]**

sannee, нужно что бы числа по порядку шли, как я писал раньше

@sannee · 24.10.2011, 23:18

ааа. ну может...

@Vepsar · 24.10.2011, 23:42

Блин я чет не понял тебе нужно просто вывести готовый массив на экран ?

Добавлено через 32 секунды
с теме же числами ?

@d1m0n1 · 24.10.2011, 23:43 **[ТС]**

мне нужно что бы вывело все числа от 10 до 60 чтобы на месте чётных стояли 0

@Vepsar · 24.10.2011, 23:51

Окау ! панятено
жди)

Добавлено через 4 минуты

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
a:array [1..100] of integer;
i:1..100;
begin
for i:=1 to 60 do
begin
    if i mod 2=0 then
                a[i]:=0
        else
        a[i]:=i;
end;
for i:=1 to 60 do
writeln(a[i]);
readln;
writeln;
writeln;
end.

Добавлено через 22 секунды
Опапа))

@d1m0n1 · 24.10.2011, 23:51 **[ТС]**

обана вот тоже самое но начинается с 10 а не с 1

@Vepsar · 24.10.2011, 23:54

xDD wtf ...

@d1m0n1 · 24.10.2011, 23:55 **[ТС]**

Vepsar, ахахахах

@Vepsar · 24.10.2011, 23:55

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
a:array [1..100] of integer;
i:1..100;
begin
for i:=10 to 60 do
begin
    if i mod 2=0 then
                a[i]:=0
        else
        a[i]:=i;
end;
for i:=10 to 60 do
writeln(a[i]);
readln;
writeln;
writeln;
end.

@d1m0n1 · 24.10.2011, 23:56 **[ТС]**

Vepsar, спасибо сам исправилvar

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
a:array [1..100] of integer;
i:1..100;
begin
for i:=1 to 60 do
begin
        if i mod 2=0 then
                a[i]:=0
        else
                a[i]:=i;
end;
for i:=10 to 60 do
writeln(a[i]);
readln;
writeln;
writeln;
end.

@Vepsar · 24.10.2011, 23:57

мб так?

Добавлено через 19 секунд
Ок ток я быстрее ))

Добавлено через 37 секунд
,,,, и нет, вы не исправили ))

@d1m0n1 · 24.10.2011, 23:57 **[ТС]**

а кстати у тя не так а у мя так
вот что у тя:0
0
0
0
0
0
0
0
0
0
11
0
13
0
15
0
17
0
19
0
21
0
23
0
25
0
27
0
29
0
31
0
33
0
35
0
37
0
39
0
41
0
43
0
45
0
47
0
49
0
51
0
53
0
55
0
57
0
59
0

@Vepsar · 24.10.2011, 23:58

в первом For-е тоже 1 на 10 нуна поменять ))

@d1m0n1 · 24.10.2011, 23:59 **[ТС]**

необязательно

@Vepsar · 24.10.2011, 23:59

Мм нет !!!! у мя нормально !!

@d1m0n1 · 25.10.2011, 00:00 **[ТС]**

ну да ладно, Спасибо!!!

@Vepsar · 25.10.2011, 00:01

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
a:array [1..100] of integer;
i:1..100;
begin
for i:=10 to 60 do
begin
    if i mod 2=0 then
                a[i]:=0
        else
        a[i]:=i;
end;
for i:=10 to 60 do
writeln(a[i]);
readln;
writeln;
writeln;
end.

Необязательно НО желательно ))

Добавлено через 12 секунд
Нет проблем ))

Новые блоги и статьи Все статьи Все блоги /
Вангую, что это не пройдёт модерацию, и на неделе я запущу свой сервер. Hrethgir 19.07.2026 Эта публикация сейчас в песочнице и ждёт приглашения. https:/ / habr. com/ ru/ sandbox/ 295048/ начало и оглавление - Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование. . .	сукцессия 33. открытые вопросы от клауде anaschu 19.07.2026 "Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .	32 сукцессия anaschu 19.07.2026 сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .	сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических anaschu 18.07.2026 Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .
сукцессия 30. Массив проверяющих друг друга моделей anaschu 18.07.2026 Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .	Грибы - это женщины, деревья - это мужчины. Анти инь янь для союза мужчины и женщины. anaschu 18.07.2026 ГЛАВНЫЙ НАУЧНО-ФИЛОСОФСКИЙ ВЫВОД: Сексуально-Репродуктивный Капитализм против Государства Моногамии Коллеги, мы вышли на финишную прямую 20-мерного ОДУ-моделирования вековой сукцессии (ветка. . .	Текстовый слайдер с нумерацией страниц и кроссбраузерность. russiannick 18.07.2026 Один мой друг написал текстовый слайдер с нумерацией страниц. Сегодня я расскажу как он умудрился подружить его с кроссбраузерностью. Очевидно сложно угодить с шириной каждому браузеру. Один крадет. . .	Грибы - это мемы, дерево - это человек. Применение микоризной модели к теории меметики Докинза. anaschu 18.07.2026 Меметический изоморфизм теории «всего»: Грибная сукцессия как модель эволюции идей Докинза Базовый код системы ОДУ микоризной сукцессии описывает не просто биологию, а универсальную. . .

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16

	Вывести нули массива, стоящие на чётных местах 24.10.2011, 22:27. Показов 3022. Ответов 37 Метки нет (Все метки) Заполнить массив из 10 элементов, числами в диапозоне от 10 до 60. Вывести нули, стоящие на чётных местах. Накону 4 или 5 по информ. 0

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:15 [ТС]
	sannee, нужно что бы числа по порядку шли, как я писал раньше 0

@sannee Просто хороший человек 392 / 182 / 24 Регистрация: 26.04.2011 Сообщений: 434
	24.10.2011, 23:18
	ааа. ну может... 0

@Vepsar 33 / 32 / 14 Регистрация: 11.08.2011 Сообщений: 158
	24.10.2011, 23:42
	Блин я чет не понял тебе нужно просто вывести готовый массив на экран ? Добавлено через 32 секунды с теме же числами ? 1

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:43 [ТС]
	мне нужно что бы вывело все числа от 10 до 60 чтобы на месте чётных стояли 0 0

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:51 [ТС]
	обана вот тоже самое но начинается с 10 а не с 1 0

@Vepsar 33 / 32 / 14 Регистрация: 11.08.2011 Сообщений: 158
	24.10.2011, 23:54
	xDD wtf ... 0

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:55 [ТС]
	Vepsar, ахахахах 0

@Vepsar 33 / 32 / 14 Регистрация: 11.08.2011 Сообщений: 158
	24.10.2011, 23:57
	мб так? Добавлено через 19 секунд Ок ток я быстрее )) Добавлено через 37 секунд ,,,, и нет, вы не исправили )) 1

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:57 [ТС]
	а кстати у тя не так а у мя так вот что у тя:0 0 0 0 0 0 0 0 0 0 11 0 13 0 15 0 17 0 19 0 21 0 23 0 25 0 27 0 29 0 31 0 33 0 35 0 37 0 39 0 41 0 43 0 45 0 47 0 49 0 51 0 53 0 55 0 57 0 59 0 0

@Vepsar 33 / 32 / 14 Регистрация: 11.08.2011 Сообщений: 158
	24.10.2011, 23:58
	в первом For-е тоже 1 на 10 нуна поменять )) 1

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	24.10.2011, 23:59 [ТС]
	необязательно 0

@Vepsar 33 / 32 / 14 Регистрация: 11.08.2011 Сообщений: 158
	24.10.2011, 23:59
	Мм нет !!!! у мя нормально !! 1

@d1m0n1 0 / 0 / 0 Регистрация: 24.10.2011 Сообщений: 16
	25.10.2011, 00:00 [ТС]
	ну да ладно, Спасибо!!! 0