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

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


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный ХОСТИНГ на базе Linux x64 и Windows x64

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

Лучшие эксперты данной рассылки

Асмик Александровна
Статус: Академик
Рейтинг: 7511
∙ повысить рейтинг »
Vasiliy83
Статус: Профессионал
Рейтинг: 2004
∙ повысить рейтинг »
Megaloman
Статус: Профессор
Рейтинг: 1728
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И СОФТ / Программирование / Basic/VBA

Номер выпуска:1063
Дата выхода:18.03.2011, 15:30
Администратор рассылки:lamed (Профессор)
Подписчиков / экспертов:195 / 88
Вопросов / ответов:2 / 2

Вопрос № 182490: Здравствуйте! У меня возникли сложности с таким вопросом: http://rfpro.ru/upload/4876...


Вопрос № 182494: Уважаемые эксперты! Пожалуйста, ответьте на вопрос: http://rfpro.ru/upload/4880...

Вопрос № 182490:

Здравствуйте! У меня возникли сложности с таким вопросом:
http://rfpro.ru/upload/4876

Отправлен: 12.03.2011, 15:54
Вопрос задал: Посетитель - 358526 (Посетитель)
Всего ответов: 1
Страница вопроса »


Отвечает 6a3uJI (8-й класс) :
Здравствуйте, Посетитель - 358526!
Вот решение Вашей задачи.
скачать решение

Оформил по примеру.

Успехов!
Заменена ссылка на исправленное решение из мини-форума
Код:
'P=0 строка удалена
'Следующая строка добавлена
P0=1000

-----
∙ Отредактировал: lamed (Профессор)
∙ Дата редактирования: 14.03.2011, 09:35 (время московское)

Ответ отправил: 6a3uJI (8-й класс)
Ответ отправлен: 12.03.2011, 16:50
Номер ответа: 266229
Беларусь, Могилёвская обл.
ICQ # 428577974

Оценка ответа: 5

Вам помог ответ? Пожалуйста, поблагодарите эксперта за это!
Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 266229 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Ответ поддержали (отметили как правильный): 1 чел.



    Вопрос № 182494:

    Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
    http://rfpro.ru/upload/4880

    Отправлен: 12.03.2011, 18:23
    Вопрос задал: Посетитель - 358526 (Посетитель)
    Всего ответов: 1
    Страница вопроса »


    Отвечает Megaloman (Профессор) :
    Здравствуйте, Посетитель - 358526! Ответ с блок-схемой смотрите в прикреплённом файле.
    Код:
    ' Двумерные массивы

    ' Ввод размерности матрицы

    CLS
    INPUT "Введите размерность матрицы n="; n

    DIM a(n, n)

    ' Ввод исходной матрицы

    FOR i = 1 TO n
    FOR j = 1 TO n
    PRINT "Введите элемент матрицы a("; USING "##"; i;
    PRINT ", "; USING "##"; j;
    INPUT ")="; a(i, j)
    NEXT j
    NEXT i

    ' Вывод исходной матрицы

    PRINT
    PRINT "Матрица a(i,j)"

    FOR i = 1 TO n
    FOR j = 1 TO n
    PRINT USING "###.##"; a(i, j);
    NEXT j
    PRINT
    NEXT i

    ' Подсчет суммы элементов с нечетными и четными индексами

    FOR k = 1 TO 2
    S = 0
    FOR i = k TO n STEP 2
    FOR j = k TO n STEP 2
    S = S + a(i, j)
    NEXT j
    NEXT i
    IF k = 1 THEN S1 = S
    IF k = 2 THEN S2 = S
    NEXT k

    ' Вывод ответа
    PRINT
    PRINT "Сумма элементов с нечетными индексами S1="; USING "####.##"; S1
    PRINT "Сумма элементов с четными индексами S2="; USING "####.##"; S2
    Прикрепленный файл: загрузить »

    -----
    Нет времени на медленные танцы

    Ответ отправил: Megaloman (Профессор)
    Ответ отправлен: 13.03.2011, 12:27
    Номер ответа: 266247
    Беларусь, Гомель
    ICQ # 475943357

    Оценка ответа: 5

    Вам помог ответ? Пожалуйста, поблагодарите эксперта за это!
    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 266247 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:


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

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

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)

    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.



    В избранное