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

UptoLike

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

67
Роль ошибок
Пусть во дворце 3 зала размерами 20*15*4, 30*20*5 и
10*5*3. В этом случае мы вводим N=3 и оператор For выполняет
цикл 3 раза.
Мы знаем, что по ошибочной программе компьютер выдает
ошибочные результаты. Например, если в нашей программе мы
вместо V = S * Z напишем V = S + Z, то результаты будут такими:
Площадь пола=300 Объем зала=304
Площадь пола=600 Объем зала=605
Площадь пола=50 Объем зала=53
Если же случайно вместо For i = 1 To N написать For i = 2
To N, то результаты будут такими:
Площадь пола=300 Объем зала=1200
Площадь пола=600 Объем зала=3000
На этом программа закончит работу и не спросит размеров
третьего зала. Вам не кажется странным, что она посчитала 1-ый
и 2-ой залы, а не 2-ой и 3-ий? Если, кажется, то учтите, что поль-
зователь ничего не знает об ошибке в программе, а компьютер не
говорит ему, размеры какого по счету зала ему нужно вводить.
Определите, что напечатает компьютер:
а) если строку For i = 1 To N поместить на три строки ниже, а
именно перед строкой S = X * Y;
б) если поменять местами строки Debug.Print и Next
.
Счетчики
Счетчик это переменная величина, в которой вы что-
нибудь подсчитываете.
Задача 1. В компьютер с клавиатуры вводятся числа. Ком-
пьютер после кода каждого числа должен напечатать, сколько
среди них уже введено положительных чисел.
Фрагмент, решающий задачу:
с = 0 Обнуляем счетчик
m: a = InputBox(“Введите очередное число”)
If a > 0 Then c = c + 1
Debug.Print “Из них положительных - ”, c
Goto m
Здесь мы используем переменную с, которая выполняет
роль счетчика положительных чисел. Сердце счетчика оператор
с = с+1. Именно он в нужный момент увеличивает счетчик на 1.
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
                                      Роль ошибок
               Пусть во дворце 3 зала размерами 20*15*4, 30*20*5 и
         10*5*3. В этом случае мы вводим N=3 и оператор For выполняет
         цикл 3 раза.
               Мы знаем, что по ошибочной программе компьютер выдает
         ошибочные результаты. Например, если в нашей программе мы
         вместо V = S * Z напишем V = S + Z, то результаты будут такими:
                                Площадь пола=300 Объем зала=304
                                Площадь пола=600 Объем зала=605
                                Площадь пола=50 Объем зала=53
               Если же случайно вместо For i = 1 To N написать For i = 2
         To N, то результаты будут такими:
                                Площадь пола=300 Объем зала=1200
                                Площадь пола=600 Объем зала=3000
               На этом программа закончит работу и не спросит размеров
         третьего зала. Вам не кажется странным, что она посчитала 1-ый
         и 2-ой залы, а не 2-ой и 3-ий? Если, кажется, то учтите, что поль-
         зователь ничего не знает об ошибке в программе, а компьютер не
         говорит ему, размеры какого по счету зала ему нужно вводить.
               Определите, что напечатает компьютер:
         а) если строку For i = 1 To N поместить на три строки ниже, а
         именно перед строкой S = X * Y;
         б) если поменять местами строки Debug.Print и Next.
                                       Счетчики
               Счетчик – это переменная величина, в которой вы что-
         нибудь подсчитываете.
               Задача 1. В компьютер с клавиатуры вводятся числа. Ком-
         пьютер после кода каждого числа должен напечатать, сколько
         среди них уже введено положительных чисел.
               Фрагмент, решающий задачу:
               с=0                   ‘Обнуляем счетчик
         m: a = InputBox(“Введите очередное число”)
               If a > 0 Then c = c + 1
               Debug.Print “Из них положительных - ”, c
               Goto m
               Здесь мы используем переменную с, которая выполняет
         роль счетчика положительных чисел. Сердце счетчика – оператор
         с = с+1. Именно он в нужный момент увеличивает счетчик на 1.

                                                                             67

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