Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Оператор цикла




Else

Оператор условия

Для реализации алгоритма с ветвлением (см. выше) необходим оператор условия. Его конструкция может иметь одну или несколько строк.
Одна строка (оператор однострочный):
If условие Then группа операторов 1 [Else группа операторов 2]
Несколько строк(оператор многострочный):
If условие Then

Группа операторов 1

Группа операторов 2 ]

End If
Квадратные скобки не ставятся, а лишь показывают то, что находящееся между ними содержимое можно опустить в случае ненадобности.
Работает этот оператор следующим образом:

  1. Проверяется условие
  2. Если условие истинно, то исполняется группа операторов 1
  3. Если условие ложно, то исполняется группа операторов 2

В качестве условия может быть использовано любое логическое выражение со знаком > (больше), < (меньше), = (равно), > = (больше либо равно), < = (меньше либо равно).
Например:
If x>0 Then

MsgBox "Число положительное"

Else

MsgBox "Число отрицательное"

End If
Примеры условий:
x > y
a > = 5 + b
8 + 13 * y < 15 + x
Также в качестве условия можно использовать переменную или арифметическое выражение. Если его результат будет равен 0, то это расценивается как "ложь", остальные значения - "истина":
If a Then

MsgBox "Не равно 0"

Else

MsgBox "Равно 0"

End If

 

Задание 7. Разработайте программу "Угадайка", которая будет загадывать число, а пользователь пытаться его угадать:

    1. Создайте следующую форму:

    1. Дважды щелкните по кнопке Ответ и в процедуре обработки события создайте код, который сравнивает введенное пользователем число в Text1.text с любым фиксированным числом, например, 5. Если числа равны, то в Text2.text должно быть введено "Угадал", в противном случае "Не угадал".
    2. Запустите программу, введите исходные данные, щелкните по кнопке Ответ, протестируйте программу, остановите, исправьте при необходимости ошибки в программе.
  1. Доработайте программу так, чтобы она в Text2.text сообщала "Больше", "Меньше", либо "Горячо", если разница между числами меньше 10, и холодно, если 10 и более.

Для организации цикла в программе используют оператор цикла.
Цикл бывает разных типов:

  • Цикл со счетчиком, в котором тело цикла выполняется определенное число раз
  • Цикл с условием, в котором тело цикла выполняется пока условие истинно.

Рассмотрим первый тип операторов цикла.

 

Цикл со счетчиком:
For Счетчик = Начальное значение To конечное значение [Step Шаг].

Тело цикла (операторы, т.е. последовательность действий выполняющаяся несколько раз)

Next Счетчик

Условные обозначения:

  1. Счетчик - это переменная, которая содержит текущее значение цикла. При каждом обороте цикла Счетчик увеличивается на Шаг.
  2. Начальное значение, Конечное значение, Шаг - это могут быть числа, выражения, переменные или свойства объектов, содержащие соответствующие числовые значения.
  3. Счетчик начинает отсчет от Начального значения, но не может превысить Конечного значения.
  4. Шаг можно опустить, тогда он будет равен 1.
  5. Шаг может быть < 0, тогда значение Счетчика будет убывать, а Начальное значение должно быть больше Конечного значения.

Работа оператора:

  1. При выполнении строки 1 переменная Счетчик принимает Начальное значение.
  2. Выполняются операторы тела цикла.
  3. При выполнении 3-ей строки Счетчик увеличивается на Шаг.
  4. Если Счетчик меньше или равен Конечному значению, то снова выполняются операторы цикла, Счетчик увеличивается (см. пункты 2, 3).
  5. Если Счетчик превысил Конечное значение, то выполняется строка, следующая за строкой Next.

Пример:
For i=1 To 10 Step 2

Print i

Next i

Такой цикл повторится 5 раз. Переменная i будет принимать значения от 1 до 10 с шагом 2, то есть 1, 3, 5, 7, 9. Эти числа будут напечатаны на форме с помощью оператора Print.

Практическое задание №8.

1. Разработайте программу, вычисляющую сумму чисел от 1 и по порядку до указанного пользователем числа.

1. Создайте следующую форму:

 

2. Дважды щелкните по кнопке Вычислить и в процедуре обработки события напишите код, который суммирует числа от 1 и до введенного пользователем в Text1.text, то есть если пользователь введет число 5, то программа суммирует: 1+2+3+4+5. Суммирование выполните с помощью цикла, в теле которого накапливайте значение: S = S + число.
Результат выведите в Text2.text.

3. Запустите программу, введите исходные данные, щелкните по кнопке Вычислить, протестируйте программу, остановите, исправьте при необходимости ошибки в программе.

2. Доработайте программу так, чтобы она вычисляла факториал, т.е. 12+22+32+....

Доработайте программу так, чтобы суммирование велось не с 1, а с любого числа, введенного пользователем, т.е. пользователь будет вводить два числа: меньше и больше ("от" и "до").

Цикл с условием. Часто бывает так, что необходимо повторить тело цикла, но заранее неизвестно какое количество раз. В таких случаях количество повторений зависит от некоторого условия.

Цикл реализуется с помощью спомощью инструкции (оператора)

Do ….. Loop

Условие выхода из цикла можно поставить вначале, перед телом цикла. Такой цикл будет называться цикл с предусловием.




Поделиться с друзьями:


Дата добавления: 2014-01-04; Просмотров: 567; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.016 сек.