Одномерный массив, найти сумму индексов нулевых элементов. Pascal.

Ответить
Vano48rus
Сообщения: 6
Зарегистрирован: 16 дек 2009, 22:00
Контактная информация:

Дан одномерный массив А(30). Вычислить:

а)произведение индексов нулевых элиментов;
б)сформировать массив В из индексов нулевых элементов.

:confused: помогите пожалуйста!

Первому написавшему решение просьба оставить ссылку на его страницу вконтакте)
Хыиуду
Сообщения: 2442
Зарегистрирован: 06 мар 2005, 21:03
Откуда: Москва
Контактная информация:

ind:=0;
s:=1;
for i:=1 to 30 do
if A=0 then
begin
s:=s*i;
B[ind]:=i;
inc(ind);
end;
Страницы в контакте нет, можно просто нажать "Спасибо".
Искусство программирования - заставить компьютер делать все то, что вам делать лень.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
Vano48rus
Сообщения: 6
Зарегистрирован: 16 дек 2009, 22:00
Контактная информация:

:) сасибо чуваг, помог очень! это и (а) и (б)?
Ответить