Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
0 / 0 / 0
Регистрация: 28.05.2013
Сообщений: 4

Из заданного вектора

28.05.2013, 19:47. Показов 1607. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Из заданного вектора А (3N) получите вектор B (N) ,очередная компонента которая равна среднему арифметическому очередной тройки компонент вектора А.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
28.05.2013, 19:47
Ответы с готовыми решениями:

Из заданного вектора A(3N) получите вектор B(N), очередная компонента которого равна среднему арифметическому очередной тройки компонент вектора А.
Решите пожалуйста! Из заданного вектора A(3N) получите вектор B(N), очередная компонента которого равна среднему арифметическому...

Вставить перед каждым элементом заданного вектора значения вектора P сохраняя одномерность
Как вставить перед каждым элементом заданного вектора значения вектора P сохраняя одномерность

Из заданного вектора A(3N) получите вектор B(N)
Помогите, пожалуйста! Очень надо! Из заданного вектора A(3N) получите вектор B(N), очередная компонента которого равна среднему...

1
Модератор
Эксперт по математике/физике
 Аватар для VSI
5291 / 4073 / 1392
Регистрация: 30.07.2012
Сообщений: 12,490
28.05.2013, 20:06
Лучший ответ Сообщение было отмечено Иван789 как решение

Решение

Цитата Сообщение от Иван789 Посмотреть сообщение
Из заданного вектора А (3N) получите вектор B (N) ,очередная компонента которая равна среднему арифметическому очередной тройки компонент вектора А.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var A:array[1..30] of integer;
    B:array[1..10] of real;
    i,j:integer;
BEGIN
for i:=1 to 30 do
begin
 A[i]:=round(random(10));
 write(A[i]:10);
end;
writeln; writeln;
j:=1; i:=1;
while i<=30 do
begin
 B[j]:=(A[i]+A[i+1]+A[i+2])/3;
 inc(i,3);
 inc(j);
end;{while}
for i:=1 to 10 do write(B[i]:10:1);
END.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
28.05.2013, 20:06
Помогаю со студенческими работами здесь

Вычислить длину заданного вектора
Дан вектор {zi}, i = 1, …, 50. Вычислить длину этого вектора: L = \sqrt{{{z}_{1}}^{2}+{{z}_{2}}^{2}+...+{{z}_{50}}^{2}}

Заменить первые два нулевые элементы заданного вектора В на два первых НЕ нулевые элементы этого вектора
Дано вектор В, состоящий из N действительных чисел. Заменить первые два нулевые элементы заданного вектора В на два первых НЕ нулевые...

Выборка из вектора экземпляров заданного класса
Здарова всем!!! Есть у меня допустим класс BaseObject, и есть классы object1, object2, object3 расширенные от BaseObject. Так вот, создал...

Для заданного вектора X(2N ) вычислить выражение
Помогите пожалуйста решить задачу на си++ Для заданного вектора X(2N ) вычислите Y = x1 - x2 + x3 - ... - x2N . Создавайте тему в...

Осуществите циклический сдвиг компонент заданного вектора A(N)
Осуществите циклический сдвиг компонент заданного вектора A(N) влево на одну позицию, то есть получите вектор А = (a2 , a3 , ..., aN...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru