Програмирование на языке Basic. Федоряка Н.И. - 13 стр.

UptoLike

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

13
CASE ELSE
<серия иначе>
END SELECT
Выражение, заданное после ключевых слов SELECT CASE, сравни-
вается с определенными значениями - условиями и если они истинны, то
выполняется соответствующая серия команд. Если не одно условие не ис-
тинно, то выполняется серия команд между CASE ELSE и END SELECT.
Пример: Выдать словесное значение числа
REM Преобразование чисел в слова
INPUT "Введите число", a
SELECT CASE a
CASE 1
PRINT "один"
CASE 2
PRINT "два"
CASE 3
PRINT "три"
...
CASE 10
PRINT "десять"
CASE ELSE
PRINT "это число не могу перевести"
END SELECT
END
В данном примере введенное число сравнивается с числами от 1 до
10 и если наше число равно одному из этих чисел, то на экран выводится
словесное значение числа. Если это не так на экран выводится сообщение:
"это число не могу перевести".
Контрольная работа.
1. Что напечатается в результате выполнения программы, если Х = 15?
10команда ветвления
20 INPUNВВЕДИТЕ ЧИСЛО”; X
30 IF X < -2 THEN Y = X/4
40 GOTO 60
50 IF X > 2 THEN Y = 4 X ELSE Y = 2
60 PRINTПРИ Х = ; X; Y=”; Y
70 END
2. Что напечатается в результате выполнения программы, если Y = 4?
10команда ветвления
20 INPUNВВЕДИТЕ ЗНАЧЕНИЕ Y”; Y
30 IF Y < 0 THEN F = Y^2 0.3
40 GOTO 80
PDF created with FinePrint pdfFactory Pro trial version www.pdffactory.com
               CASE ELSE
               <серия иначе>
               END SELECT
               Выражение, заданное после ключевых слов SELECT CASE, сравни-
         вается с определенными значениями - условиями и если они истинны, то
         выполняется соответствующая серия команд. Если не одно условие не ис-
         тинно, то выполняется серия команд между CASE ELSE и END SELECT.
               Пример: Выдать словесное значение числа
               REM Преобразование чисел в слова
               INPUT "Введите число", a
               SELECT CASE a
               CASE 1
               PRINT "один"
               CASE 2
               PRINT "два"
               CASE 3
               PRINT "три"
               ...
               CASE 10
               PRINT "десять"
               CASE ELSE
               PRINT "это число не могу перевести"
               END SELECT
               END
               В данном примере введенное число сравнивается с числами от 1 до
         10 и если наше число равно одному из этих чисел, то на экран выводится
         словесное значение числа. Если это не так на экран выводится сообщение:
         "это число не могу перевести".
                                   Контрольная работа.
         1. Что напечатается в результате выполнения программы, если Х = 15?
         10 ‘ команда ветвления
         20 INPUN “ВВЕДИТЕ ЧИСЛО”; X
         30 IF X < -2 THEN Y = X/4
         40 GOTO 60
         50 IF X > 2 THEN Y = 4 – X ELSE Y = 2
         60 PRINT “ПРИ Х = “; X; “Y=”; Y
         70 END

         2. Что напечатается в результате выполнения программы, если Y = 4?
         10 ‘ команда ветвления
         20 INPUN “ВВЕДИТЕ ЗНАЧЕНИЕ Y”; Y
         30 IF Y < 0 THEN F = Y^2 – 0.3
         40 GOTO 80

                                                                              13


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