Операторы цикла в Visual Basic.NET Кирсанова Инна Викторовна МОУ лицей «РИТМ» Хабаровск. - презентация

1 Операторы цикла в Visual Basic.NET Кирсанова Инна Викторовна МОУ лицей «РИТМ» Хабаровск

2 Цикл Алгоритм, в котором серия команд (тело цикла) выполняется многократно. 1. Цикл с постусловием 2. Цикл с предусловием 3. Цикл с параметром

3 1. Цикл с постусловием Тело цикла выполнится, как минимум, один раз, независимо от того истинно условие или нет. Условие Тело цикла да нет

4 1.1. Оператор Do …. Loop While Do операторы Loop While условие продолжения работы цикла Делай, пока условие истинно Делай Возврат назад Пока истинно условие

5 1.2. Оператор Do …. Loop Until Do операторы Loop Until условие завершения работы цикла Делай, пока условие ложно Делай Возврат назад Пока условие ложно

6 2. Цикл с предусловием Тело цикла может не выполнится ни разу Условие Тело цикла да нет

7 2.1. Оператор Do While …. Loop Do While условие продолжения работы цикла операторы Loop Делай, пока условие истинно

8 2.2. Оператор Do Until …. Loop Do Until условие завершения работы цикла операторы Loop Делай, пока условие ложно

9 3. Цикл с параметром Используется, когда заранее известно, сколько раз тело цикла необходимо выполнить СЧЕТЧИК ТЕЛО ЦИКЛА

10 Оператор цикла For For Счетчик = НачЗнач To КонЗнач [ Step шаг ] Операторы Next [ Счетчик ] Если шаг не указан, он считается равным 1.

11 Dim i As Integer Dim a As String Задача 1. Пусть программа десять раз напечатает «Привет!». a = "Привет!" For i = 1 To 10 ListBox1.Items.Add(a) Next i Привет!

12 Список - ListBox1. ListBox1.Items.Add(а) Добавляет элемент в список Позволяет задать или получить значения элементов списка

13 Пример: A = 225 B = c = 3.14 d = "Информатика" ListBox1.Items.Add(A) ListBox1.Items.Add(B) ListBox1.Items.Add(c) ListBox1.Items.Add(d) Информатика

14 Задача 2: Составить таблицу для перевода веса, выраженного в центнерах (от 1 до 10 ц), в килограммы. 1 ц = 100 кг 2 ц = 200 кг 3 ц = 300 кг …………….. 10 ц = 1000 кг Dim c, kg As Integer … For c = 1 to 10 kg = c*100 ListBox1.Items.Add(c & ц = & kg & кг) Next c

15 Домашняя работа: Напечатать таблицу перевода 1, 2, …, 20 $ США в рубли по текущему курсу. А) Значения курса заданы в программе; Б) Значения курса вводятся с клавиатуры.