Найти сумму элементов массива, кратных данному К - VB

Visual Basic

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 5.00/9:

@q7 1 / 1 / 1 Регистрация: 08.02.2010 Сообщений: 38

	Найти сумму элементов массива, кратных данному К 10.12.2010, 19:09. Показов 1968. Ответов 2 Метки нет (Все метки) В массив А[N] занесены натуральные числа. Найти сумму тех элементов, которые кратны данному К. 0

Лучшие ответы (1)

Сообщение: #1190119

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

10.12.2010, 19:09

Ответы с готовыми решениями:

Найти сумму тех элементов массива, которые кратны данному К
'В массив A занесены натуральные числа. 'Найти сумму тех элементов, которые кратны данному К. Function summa_k(razmer As Integer) As...

Найти сумму элементов массива, не кратных 2
Помогите пожалуйста. Нужно составить массив С(N) в котором нужно найти сумму элементов не кратных 2. работу почти сделал но что-то не так...

Найти сумму элементов массива, кратных данному K
1) Дан массив натуральных чисел. Найти сумму элементов,кртных данному K. 2)В целочисленной последовательности есть нулевые элементы....

SuPeR XaKer

2857 / 1986 / 788

Регистрация: 23.09.2010

Сообщений: 4,876

10.12.2010, 20:59

PureBasic
1
2
3
4
5
6
for i=1 to n
if a(i) mod k=0 then
sum=sum+a(i)
end if
next i
print sum

1 / 1 / 1

Регистрация: 08.02.2010

Сообщений: 38

11.12.2010, 12:24 [ТС]

Сообщение было отмечено q7 как решение

Решение

Сообщение от SuPeR XaKer

PureBasic
1
2
3
4
5
6
for i=1 to n
if a(i) mod k=0 then
sum=sum+a(i)
end if
next i
print sum

мне надо в VB если можно!

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

11.12.2010, 12:24

Помогаю со студенческими работами здесь

Найти сумму тех элементов массива, которые кратны данному K
1) Дан массив A(N), найти сумму тех элементов которые кратны данному K Маленько начал решать, но не понимаю в чём ошибка, если можно...

Найти сумму и количество элементов массива, кратных данному K
Дан масив натуральных чисел. Найти сумму и количество элементов ,кратных данному K.

Найти сумму и количество элементов массива, кратных данному К
помогите,решите пожалуйста 1)Дан массив натуральных чисел. Найти сумму и количество элементов, кратных данному К.

Найти сумму элементов, кратных данному K.
Дан массив натуральных чисел. Найти сумму элементов, кратных данному K.

В массиве найти сумму элементов кратных данному
В массиве a занесены натуральные числа. Найти сумму тех элементов, которые кратны данному k.

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Установка 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 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .

Наверх