Программа На Языке Vba

Тема в разделе "Visual Basic", создана пользователем kira95, 25 дек 2013.

  1. kira95

    kira95 Member

    Регистрация:
    25 дек 2013
    Сообщения:
    6
    Симпатии:
    0
    Написать фрагмент программы на VBA для нахождения произведения чисел с шагом 2 на интервале от -10 до 10 используя For-Next, Do-Loop While с предпосылкой и Do-Loop Until с послесловием
     
  2. FelixMacintosh

    Регистрация:
    6 янв 2014
    Сообщения:
    21
    Симпатии:
    6
    Код (LotusScript):
    dim f& 'Объявление переменной F с типом Long (можно и так: dim f as Long )

    for f = -10 to 10 step 2 'Инициализация цикла с шагом добавления =2
    'Тело цикла здесь можно разместить ваши инструкции
    next

    '@@@@@@@@@@@@@@@@@@@

    f= - 10: do 'Присвоение f и инициализация цикла
    if f >= 10 then exit do 'Условие выхода
    f=f + 2
    loop

    '@@@@@@@@@ П о с л е с л о в и е ) @@@@@@@@@@

    f= - 10: do 'Присвоение f и инициализация цикла
    f=f + 2
    loop until f >= 10 'Условие выхода

    '@@@@@@@@@@@@@@@@@@@

    f= - 10: do while f< 10 'продолжать цикл пока f<10
    f=f+2
    loop 'Закрывающий оператор

    '@@@@@@@@@@@@@@@@@@@

    'Можно ещё и так:
    f= - 10: while f< 10 'продолжать цикл пока f<10
    f=f+2
    wend 'Закрывающий оператор
     
Загрузка...

Поделиться этой страницей