0 / 0 / 0
Регистрация: 21.10.2010
Сообщений: 41

Даны целые числа K,N а также К наборов целых чисел по N элементов в каждом наборе .Для каждого набора вывести сумму его элементов

24.10.2010, 19:00. Показов 1458. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Ребята,пожалуйста,укажите ошибку...
Даны целые числа K,N а также К наборов целых чисел по N элементов в каждом наборе .Для каждого набора вывести сумму его элементов .

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Dim B as Integer 
K=(Text1.Text)
N=(Text2.Text)
ReDim A(N,K) as Integer 
ReDim S(K) as Integer 
For i=1 To K
A(i)=InputBox ("число" & str(i) & "=")
Next i
For j=1 To N
A(j)=InputBox ("число" & str(j) & "=")
Next j
For i=1 To K
For j=1 To N
If A(i,j) then
S(K)=S(K)+A(i,j)
End if
Next j
Print S(K)
Next i
End Sub
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
24.10.2010, 19:00
Ответы с готовыми решениями:

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента, равного 2
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента,...

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора
Помогите с заданием!!! Даны целые числа K, N, а также K наборов целых чисел по N элемен- тов в каждом наборе. Для каждого набора...

Даны целые числа K,N, а также K набор целых чисел по N элементов в каждом наборе. Вывести суму его элементов для каждого набора
Задача из роздела серий.

2
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
24.10.2010, 21:16
на первый взгляд
строка 4 A(N,K)
строка 7 A(i) !!!!!!!!!!!!!!
строка 10 A(j) !!!!!!!!!!!!!
0
 Аватар для Alex77755
11523 / 3810 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
24.10.2010, 22:32
Dim B as Integer - зачем объявлен если не используется?
K=(Text1.Text) - переменная K не объявлена
N=(Text2.Text)- переменная N не объявлена
ReDim A(N,K) as Integer - откуда редим если не объявлен А(нет Dim A())
ReDim S(K) as Integer - откуда редим если не объявлен S(нет Dim S()),
For i=1 To K
A(i)=InputBox ("число" & str(i) & "=") - редим А как двухмерный, присвоение как одномерному
Next i
For j=1 To N
A(j)=InputBox ("число" & str(j) & "=") - редим А как двухмерный, присвоение как одномерному
дальше уже не смотрю
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.10.2010, 22:32
Помогаю со студенческими работами здесь

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Вычислить произведение всех элементов, входящих в...

Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе
Даны целые числа K, N, а также K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента,...

Series>Даны целые числа К,N,а также К наборов целых чисел по N элементов в каждом наборе!
Даны целые числа К,N,а также К наборов целых чисел по N элементов в каждом наборе.Для каждого набора выполнить следующее действие:если в...

Даны целые числа K,N,а так же K наборов целых чисел по N элементов в каждом наборе
Даны целые числа K,N,а так же K наборов целых чисел по N элементов в каждом наборе. Для каждого набора вывести номер его первого элемента,...

Даны целые числа K , N ,а так же K наборов целых чисел по N элементов в каждом наборе
Даны целые числа K,N,а так же K наборов целых чисел по N элементов в каждом наборе. Вывести общую сумму всех элементов входящих в данные...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

Новые блоги и статьи
Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana
stackOverflow 25.04.2025
Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .
Полностью асинхронный счётчик на логике (сумматорах) трёх состояний и асинхронных регистрах трёх состояний. Структура "электронный Buttom Up"
Hrethgir 25.04.2025
Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python
py-thonny 25.04.2025
Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .
Apache Kafka vs RabbitMQ в микросервисной архитектуре
ArchitectMsa 25.04.2025
Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .
Параллельное программирование с OpenMP в C++
NullReferenced 24.04.2025
Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .
Цепочки методов в C# с Fluent API
UnmanagedCoder 24.04.2025
Современное программирование — это не только решение функциональных задач, но и создание кода, который удобно поддерживать, расширять и читать. Цепочки методов и Fluent-синтаксис в C# стали мощным. . .
Мульти-тенантные БД с PostgreSQL Row Security
Codd 23.04.2025
Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .
Реализация конвейеров машинного обучения с Python и Scikit-learn
AI_Generated 23.04.2025
Мир данных вокруг нас растёт с каждым днём, и умение эффективно обрабатывать информацию стало необходимым навыком. Специалисты по машинному обучению ежедневно сталкиваются с задачами предобработки. . .
Контроллеры Kubernetes Ingress: Сравнительный анализ
Mr. Docker 23.04.2025
В Kubernetes управление входящим трафиком представляет собой одну из ключевых задач при построении масштабируемых и отказоустойчивых приложений. Ingress — это API-объект, который служит вратами. . .
Оптимизация кода Python с Cython и Numba
py-thonny 23.04.2025
Python прочно обосновался в топе языков программирования благодаря своей простоте и гибкости. Разработчики любят его за читабельность кода и богатую экосистему библиотек. Но у этой медали есть и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru