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

Заменить элемент A[k] средним арифметическим K первых элементов

30.03.2017, 18:12. Показов 2229. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста с кодом:

Задан вещественный массив А размерностью N. Заменить элемент Ak (3 ≤ k ≤ N), среднее арифметическое K первых элементов массива.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.03.2017, 18:12
Ответы с готовыми решениями:

Заменить в каждом из них максимальный элемент средним арифметическим положительных элементов
Ввести одномерные массивы X1, X2, X3 . Заменить в каждом из них максимальный элемент средним арифметическим положительных элементов (если...

Заменить в каждом из них максимальный элемент средним арифметическим положительных элементов
Ввести одномерные массивы X1, X2, X3 . Заменить в каждом из них максимальный элемент средним арифметическим положительных элементов (если...

Каждый элемент массива A[k] заменить средним значением первых k элементов массива
Дан числовой массив A размера N. Каждый элемент массива A заменить средним значением первых k элементов массива. Что означает Каждый...

1
 Аватар для Hitoku
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
30.03.2017, 18:17
Лучший ответ Сообщение было отмечено Chilly85 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var a:array[1..100] of real;
    ave:real; k,n,i:integer;
begin
  write('N = '); readln(n);
  for i:=1 to n do begin
    a[i]:=50*random; write(a[i]:0:2,' ');
  end; writeln;
  repeat
    write('K = '); readln(k);
  until (k>=3) and (k<=n);
  ave:=0;
  for i:=1 to k do ave:=ave+a[i];
  ave:=ave/k; a[k]:=ave;
  for i:=1 to n do write(a[i]:0:2,' ');
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.03.2017, 18:17
Помогаю со студенческими работами здесь

В одномерном массиве заменить все элементы, стоящие на нечетных местах средним арифметическим всех элементов
11. В одномерном массиве заменить все элементы, стоящие на нечетных местах средним арифметическим всех элементов

Замените каждый элемент массива средним арифметическим всех предшествующих ему элементов
Замените каждый элемент массива средним арифметическим всех предшествующих ему элементов. Работаем с одним массивом!!! Заранее...

Наибольшее заменить средним арифметическим двух чисел, наименьшее заменить их удвоенным произведением
Даны 2 числа. Наибольшее заменить средним арифметическим двух чисел, наименьшее заменить их удвоенным произведением.

Наименьший член последовательности заменить средним арифметическим всех членов
1. Даны целые числа. Наименьший член последовательности заменить средним арифметическим всех членов (если в последовательности несколько...

Наименьшее из трёх чисел заменить их средним арифметическим, а наибольшее - их удвоенным произведением
Ввести три действительных числа. Наименьшее из них заменить их средним арифметическим значением, а наибольшее их удвоенным произведением.


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru