Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Basic / VBA


Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Basic/VBA

Выпуск № 797
от 10.10.2008, 20:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 249, Экспертов: 21
В номере:Вопросов: 1, Ответов: 1

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 146128: Здравствуйте!!! В двумерном массиве вещественных чисел вычислите сумму всех элементов равных последнему элементу массива!!! начало вроде такое должно быть CLS Input "введите число строк"; N input "введите число столбцов...

Вопрос № 146.128
Здравствуйте!!! В двумерном массиве вещественных чисел вычислите сумму всех элементов равных последнему элементу массива!!!

начало вроде такое должно быть
CLS
Input "введите число строк"; N
input "введите число столбцов"; M
dim A( N, M)
for i=1 to N
for i=1 to M

Отправлен: 05.10.2008, 19:50
Вопрос задал: Андреев Павел Александрович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Савчук Иван Иванович
Здравствуйте, Андреев Павел Александрович!

CLS
Input "введите число строк"; N
input "введите число столбцов"; M
dim A( N, M)
dim s as single
for i=1 to N
for j=1 to M 'i исправил на j
input a(i,j) ' в случае ручного ввода
next j
next i
for i=1 to n
for j=1 to m
if a(i,j)=a(n,m) then s=s+a(i,j)
next j
next i
print "Сумма элементов ", s
Ответ отправил: Савчук Иван Иванович (статус: 3-ий класс)
Ответ отправлен: 06.10.2008, 05:01
Оценка за ответ: 5


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале

∙ Версия системы: 5.5 от 09.10.2008

Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное