Основные возможности Visual Basic. Макова Н.Е. - 72 стр.

UptoLike

ВУЗ: 

МичГАУ | Мичуринск

Составители: 

Рубрика: 

72
2*2=4 2*3=6 2*4=8 2*5=10
2*6=12
2*7=14
2*8=16
2*9=18
3*2=6 3*3=9 3*4=12
3*5=15
3*6=18
3*7=21
3*8=24
3*9=27
4*2=8 4*3=12
4*4=16
4*5=20
4*6=24
4*7=28
4*8=32
4*9=36
5*2=10
5*3=15
5*4=20
5*5=25
5*6=30
5*7=35
5*8=40
5*9=45
6*2=12
6*3=18
6*4=24
6*5=30
6*6=36
6*7=42
6*8=48
6*9=54
7*2=14
7*3=21
7*4=28
7*5=35
7*6=42
7*7=49
7*8=56
7*9=63
8*2=16
8*3=24
8*4=32
8*5=40
8*6=48
8*7=56
8*8=64
8*9=72
9*2=18
9*3=27
9*4=36
9*5=45
9*6=54
9*7=63
9*8=72
9*9=81
Начнем с малого. Пусть нужно напечатать
2*2=4
Вот фрагмент_1 программы:
a = 2
b=2
proizv = a*b
Print a, “*”, b, “=”, proizv
Усложним задачу. Попробуем заставить компьютер напеча-
тать первую строку таблицы:
2*2=4
2*3=6
2*4=8
2*5=10
2*6=12
2*7=14
2*8=16
2*9=18
Замечаем, что здесь нам нужно решить 8 элементарных за-
дач на вычисление произведения. Первую из которых решает
фрагмент_1. Все они очень похожи и различаются лишь значени-
ем второго сомножителя. Т.о., для решения каждой из восьми за-
дач подошел бы наш фрагмент_1, если бы в операторе b=2 вместо
двойки стояла нужная цифра. В данном случае идеально подхо-
дит оператор For.
Фрагмент_2:
a = 2
For b=2 To 9
proizv = a*b
Print a; “*”; b; “=”; proizv;
Next b
Следующая ступень усложнения – последняя – напечатать
не одну строку таблицы, а восемь. Для этого фрагмент_2 должен
быть выполнен 8 раз, каждый раз с новым значением а. Чтобы
этого достичь, “обнимем” фрагмент_2 оператором For точно так-
же, как мы обнимали фрагмент_1.
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
          2*2=4     2*3=6      2*4=8     2*5=10     2*6=12    2*7=14     2*8=16   2*9=18
          3*2=6     3*3=9      3*4=12    3*5=15     3*6=18    3*7=21     3*8=24   3*9=27
          4*2=8     4*3=12     4*4=16    4*5=20     4*6=24    4*7=28     4*8=32   4*9=36
          5*2=10    5*3=15     5*4=20    5*5=25     5*6=30    5*7=35     5*8=40   5*9=45
          6*2=12    6*3=18     6*4=24    6*5=30     6*6=36    6*7=42     6*8=48   6*9=54
          7*2=14    7*3=21     7*4=28    7*5=35     7*6=42    7*7=49     7*8=56   7*9=63
          8*2=16    8*3=24     8*4=32    8*5=40     8*6=48    8*7=56     8*8=64   8*9=72
          9*2=18    9*3=27     9*4=36    9*5=45     9*6=54    9*7=63     9*8=72   9*9=81
                Начнем с малого. Пусть нужно напечатать
                2*2=4

                Вот фрагмент_1 программы:
         a=2
         b=2
         proizv = a*b
         Print a, “*”, b, “=”, proizv
               Усложним задачу. Попробуем заставить компьютер напеча-
         тать первую строку таблицы:

         2*2=4 2*3=6 2*4=8 2*5=10 2*6=12 2*7=14 2*8=16 2*9=18
               Замечаем, что здесь нам нужно решить 8 элементарных за-
         дач на вычисление произведения. Первую из которых решает
         фрагмент_1. Все они очень похожи и различаются лишь значени-
         ем второго сомножителя. Т.о., для решения каждой из восьми за-
         дач подошел бы наш фрагмент_1, если бы в операторе b=2 вместо
         двойки стояла нужная цифра. В данном случае идеально подхо-
         дит оператор For.
               Фрагмент_2:
         a=2
         For b=2 To 9
           proizv = a*b
           Print a; “*”; b; “=”; proizv;
         Next b
               Следующая ступень усложнения – последняя – напечатать
         не одну строку таблицы, а восемь. Для этого фрагмент_2 должен
         быть выполнен 8 раз, каждый раз с новым значением а. Чтобы
         этого достичь, “обнимем” фрагмент_2 оператором For точно так-
         же, как мы обнимали фрагмент_1.

         72

PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com

Страницы