Массивы

@Кристина2704 · Регистрация: 28.10.2013

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

Здравствуйте!Помогите,пожалуйста,решить такую задачу:
Дан одномерный вещественный массив А [1..10].Вычислить произведение индексов нулевых элементов.

@castaway · 28.10.2013, 21:00

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

castaway, я не запускала.
Так лучше?

Лучше, но тоже есть ошибки.
1. Индексация массивов начинается с нуля (это не бэйсик).
2. Операция сравнения выглядит так: if (a[i] == 0) ...

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

Мой код работает и компилится:

А разве ты писал 7-й пост?

@EzCoding · 28.10.2013, 21:00

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

castaway, я не запускала.
Так лучше?

C++
1
2
3
4
5
6
7
8
9
10
11
#include <stdio.h>
void main()
{
int a[10];
int n;
for (int i=1; i<11; i++)
{
if (a[i]=0) n=i*n;
}
printf("%d", n);
}

Вы не проверяете нулевой элемент массива. N - не инициализрованна. Писать void main () - не принято. Равентсво внутри скобок - == а не =
castaway, опередил

@programina · 28.10.2013, 21:00

Не по теме:

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

Какой паскаль? Я про 7-й пост. Там откровенный бред написан, который даже компилироваться не будет.

Не судите так строго, она хотя бы сама старается писать.

@EzCoding · 28.10.2013, 21:02

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

Лучше, но тоже есть ошибки.
1. Индексация массивов начинается с нуля (это не бэйсик).
2. Операция сравнения выглядит так: if (a[i] == 0) ...

А разве ты писал 7-й пост?

Я уже выложил решение постом ранее, смысл обсуждать это же решение(написанное другим человеком, криво и поздно)?

@castaway · 28.10.2013, 21:03

Не по теме:

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

Не судите так строго, она хотя бы сама старается писать.

Тоже верно..

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

Я уже выложил решение постом ранее, смысл обсуждать это же решение(написанное другим человеком, криво и поздно)?

Не совсем понял о чём речь?..

@Max Krieg · 28.10.2013, 21:05

вот вам на рубях=)

Ruby
1
2
3
4
5
6
7
8
9
a=[] # требуемый массив
k=1 # изначально произведение равно 1 пусть будет
# заполнение можно по-разному организовать. Поэтому приводить его я не буду
for i in 0...a.size # цикл от нулевого до последнего эл-та
  if a[i]==0.0 # если iтый элемент  равен нулю
    k*=i # домножаем произведение на индекс.
  end
end
puts k # печатаем искомое

@EzCoding · 28.10.2013, 21:06

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

Не по теме:

Тоже верно..

Не совсем понял о чём речь?..

Я выложил свое решение несколькими постами ранее ( перед 7 постом).
Ход решения, описанный в 7 посте собственно такой же(тот же цикл, все то же), но написанный с несколькими ошибками.
Какой смысл его сейчас обсуждать если
1) Решение задачи уже найдено.
2) Оказывается нужен не код на C++ а на Паскале.
Вот о чем я)

@Angeline · 28.10.2013, 21:07

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

Я уже выложил решение постом ранее, смысл обсуждать это же решение(написанное другим человеком, криво и поздно)?

Ну может другой человек криво и поздно, но пытается учиться? А вы идите в раздел экспертов с вашей высокомерностью. Там может такие фразы и могут быть хоть чуть-чуть правильными.

@programina · 28.10.2013, 21:07

Не по теме:

Сообщение от Max Krieg

вот вам на рубях=)

Ну всё, бросаю Си со всеми плюсами и бегу на Ruby ))

@castaway · 28.10.2013, 21:08

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

Какой смысл его сейчас обсуждать если

Я лишь сказал что в нём куча ошибок и он не скомпилируется.

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

Я выложил свое решение несколькими постами ранее ( перед 7 постом).

Ну молодец.

@Кристина2704 · 28.10.2013, 21:08 **[ТС]**

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

Я выложил свое решение несколькими постами ранее ( перед 7 постом).
Ход решения, описанный в 7 посте собственно такой же(тот же цикл, все то же), но написанный с несколькими ошибками.
Какой смысл его сейчас обсуждать если
1) Решение задачи уже найдено.
2) Оказывается нужен не код на C++ а на Паскале.
Вот о чем я)

Дааа,нужен на Паскале, а в том разделе никто не отвечает(((

@EzCoding · 28.10.2013, 21:10

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

Ну может другой человек криво и поздно, но пытается учиться? А вы идите в раздел экспертов с вашей высокомерностью. Там может такие фразы и могут быть хоть чуть-чуть правильными.

Если вы учитесь - пробуйте компилировать ваш код прежде чем его отправлять.

@Max Krieg · 28.10.2013, 21:10

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

Не по теме:

Ну всё, бросаю Си со всеми плюсами и бегу на Ruby ))

руби хорош только объемом кода=)) а по быстродействию лучше си.

@Кристина2704 · 28.10.2013, 21:16 **[ТС]**

Ребята-информатики,помогите сделать это на Паскале,Пожалуйстааааа

@castaway · 28.10.2013, 21:20

Сообщение от Кристина2704

Ребята-информатики,помогите сделать это на Паскале,Пожалуйстааааа

Советую обратиться в раздел Паскаля.

@EzCoding · 28.10.2013, 21:22

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const
  n = 10;
var
  mas : array [1..N] of real;
  i : integer;
  s : real;
begin
  s:=1;
  i:=1;
  while (i<n) do
  begin
    readln(mas[i]);
    if mas[i] = 0 then s:=s*i;
    i:=i+1;
  end;
  writeln(s);
 end.

Вроде так

@ct0r · 28.10.2013, 21:28

s надо бы сделать integer
отделить ввод массива от вычислений
неверный while заменить на for i := 1 to n do

@EzCoding · 28.10.2013, 21:30

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

s надо бы сделать integer
отделить ввод массива от вычислений
неверный while заменить на for i := 1 to n do

С чего бы S integer если элементы массива real???
Зачем отделять?
Зачем заменять если можно просто исправить вайл?

@Кристина2704 · 28.10.2013, 21:30 **[ТС]**

спасибо-спасибо)))

@EzCoding · 28.10.2013, 21:35

Сообщение от Кристина2704

спасибо-спасибо)))

Исправьте в коде в цикле while (i<=n)
Это важно!

Новые блоги и статьи Все статьи Все блоги /
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .	Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Данные берутся из. . .

@Кристина2704 0 / 0 / 0 Регистрация: 28.10.2013 Сообщений: 13

	Массивы 28.10.2013, 20:03. Показов 2360. Ответов 41 Метки нет (Все метки) Здравствуйте!Помогите,пожалуйста,решить такую задачу: Дан одномерный вещественный массив А [1..10].Вычислить произведение индексов нулевых элементов. 0

@Кристина2704 0 / 0 / 0 Регистрация: 28.10.2013 Сообщений: 13
	28.10.2013, 21:16 [ТС]
	Ребята-информатики,помогите сделать это на Паскале,Пожалуйстааааа 0

@ct0r Игогошка! 1801 / 708 / 44 Регистрация: 19.08.2012 Сообщений: 1,367
	28.10.2013, 21:28
	s надо бы сделать integer отделить ввод массива от вычислений неверный while заменить на for i := 1 to n do 1

@Кристина2704 0 / 0 / 0 Регистрация: 28.10.2013 Сообщений: 13
	28.10.2013, 21:30 [ТС]
	спасибо-спасибо))) 0