Скачать презентацию
Идет загрузка презентации. Пожалуйста, подождите
Презентация была опубликована 9 лет назад пользователемЯков Кузьмин
1 Цикл FOR. Для повторных действий определенное количество раз в VB существует цикл, который записывается так: FOR i=1 TO 20 STEP 0.5(заголовок цикла) команды цикла (тело цикла) NEXT(конец цикла) i - переменная цикла, которая будет изменять свое значение по мере выполнения цикла от начального значения (нз=1) до конечного значения (кз=20) с шагом 0.5 (шп=0.5), т.е. значения переменной цикла будут изменяться так: 1, 1.5, 2, – данный цикл будет выполняться 39 раз. Сколько раз выполняется цикл? Количество (к) вычисляется по следующей формуле: к=(кз- нз)/шп+1. Для нашего цикла получается – (20-1)/0.5+1=39. Если шаг изменения переменной цикла равен 1, то он не указывается.
2 Графическое представление цикла FOR: ? - условие завершения цикла (i>кз), как только текущее значение переменной цикла станет больше кз, так цикл завершается. Некоторые последовательности отрезков. Задание_1: Используя цикл FOR, построить последовательность одинаковых отрезков, которая изображена на рисунке. Начальное значение координаты Х равно 10 (первый отрезок). Далее эта координата увеличивается на 20 (Х=Х+20). Тогда программа построения данной последовательности выглядит так: да нет Тело цикла ? начало конец i=нз i=i+шп
3 Private Sub Button1_Click() Dim x, i as integer DRAW.BEGIN(FMain) x=10 FOR i=1 TO 10 DRAW.LINE(x, 20, x, 200) x=x+20 NEXT DRAW.END End Sub
4 Задание_2 Private Sub Button2_Click() Dim x, d, i as integer DRAW.BEGIN(FMain) X=20 D=150 FOR i=1 TO 10 LINE(X,10, X, D+10) X=X+20 D=D-10 NEXT DRAW.END End Sub
5 Задание_3 Задание_4
6 Задание_5
Еще похожие презентации в нашем архиве:
© 2024 MyShared Inc.
All rights reserved.