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

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


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

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

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

Выпуск № 803
от 18.10.2008, 00:05

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

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


Вопрос № 146949: Здравствуйте помогите решить несколько заданий 1 Значения двумерного массива задаются с помощью вложенного оператора цикла в представленном фрагменте for n=1 to 5 for k=1 to 5 B(N,K)= N+K next K next N Чему будет рав...

Вопрос № 146.949
Здравствуйте помогите решить несколько заданий
1
Значения двумерного массива задаются с помощью вложенного оператора цикла в представленном фрагменте
for n=1 to 5
for k=1 to 5
B(N,K)= N+K
next K
next N
Чему будет равно значение B(2,4)
2
В таблице задан рост 12 человек (в метрах)
1,68 1.57 1.70
1.73 1.59 1.61
1.65 1.78 1.80
1.64 1.66 1.74

А) создать и распечатать двумерных массив
В) Найти в этом массиве элемент равный 178 и напечатать его номер
Г)Найти максимальный элемент массива
А)
Отправлен: 12.10.2008, 18:48
Вопрос задал: Андреев Павел Александрович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Архипов Александр Леонидович
Здравствуйте, Андреев Павел Александрович!
1 задача
Ответ 6
Решение - каждый элемент двумерного массива равен сумме его нидексов (см. строку В(N,K)= N+K), следовательно В(2,4) = 2+4 = 6

2 задача
cls
rem Создаём и заполняем массив данными
dim N as ineger
N = 12
dim Rost(N) as double
for k = 1 to N
input Rost(k)
next k

rem Выводим на печать массив
for k = 1 to N
print Rost(k)
next k

rem Ищем номер в массиве со значением 1.78
dim Ch as double
dim Cn as integer
Ch = 1.78
Cn = 0
for k = 1 to N
if Rost(N) = Ch then Cn = k
next k
print Cn

rem Ищем максимальное значение массива
dim Cmax as integer
Cmax = 0
for k = 1 to N
if Rost(N) > Cmax then Cmax = Rost(N)
next k
print Cmax
Ответ отправил: Архипов Александр Леонидович (статус: Студент)
Ответ отправлен: 13.10.2008, 05:58
Оценка за ответ: 5


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

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

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

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

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

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


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


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

∙ Версия системы: 5.6 от 14.10.2008

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

В избранное