- Преподавателю
- Информатика
- Изучаем язык BASIC. Занятие 30. Оператор CASE
Изучаем язык BASIC. Занятие 30. Оператор CASE
| Раздел | Информатика |
| Класс | - |
| Тип | Конспекты |
| Автор | Гегелашвили Т.П. |
| Дата | 18.08.2015 |
| Формат | doc |
| Изображения | Нет |
Занятие 30
Оператор CASE
Выполняет один из нескольких блоков операторов в зависимости от значения выражения.
SELECT CASE тест-выражение
CASE список выражений 1
[блок операторов 1]
CASE список выражений 2
[блок операторов 2]
[CASE ELSE
[блок операторов]]
END SELECT
Тест-выражение - любое числовое или строковое выражение
Список выражений - одно или несколько выражений для сравнения с тест-выражением. В выражении ключевое слово IS должно стоять перед любым знаком отношения.
Блок операторов - один или несколько операторов в одной или нескольких строках.
Аргументы списка выражений могут принимать любую из следующих форм или комбинацию и должны разделяться запятыми:
Выражение[, выражение]
Выражение ТО выражение
IS знак отношения выражение
Выражение - любое числовое или строковое выражение, совместимое с тест-выражением
Знак отношения - один из следующих знаков отношения: <, <=, >, >=, <> или =.
Пример:
INPUT "Введите уровень риска (1-5): "; Total
SELECT CASE Total
CASE IS >= 5
PRINT «Максимальный риск, шансов на возвращение нет»
PRINT»Сходите в нотариальную контору»
CASE 2 TO 4
PRINT «Высокий риск, шансов на возвращение не много»
PRINT»Проверьте снаряжение и припасы»
CASE 1
PRINT»Риск отсутствует, возврат гарантирован.»
PRINT»В вас отсутствует дух авантюризма»
END SELECT
1. Составить программу, которая должна определять день недели для произвольного дня месяца. В ней считается, что первое число данного месяца - понедельник.
CLS
INPUT d
Select case w = d mod 7
Case 1
PRINT "понедельник"
Case 2
PRINT "вторник"
Case 3
PRINT "среда"
Case 4
PRINT "четверг"
Case 5
PRINT "пятница"
Case 6
PRINT "суббота"
Case 0
PRINT "воскресенье"
END select
2. Напишите программу, которая будет решать ту же задачу при условии, что w1 - день недели для первого числа месяца. Значение w1 (целое число от 1 до 7) должно запрашиваться программой. Интересующее нас число месяца d (от 1 до 31) также должно запрашиваться. Предполагается, что ввод данных будет корректным.
CLS
INPUT w,d
Select case (d +w-1) mod 7
Case 1
PRINT "понедельник"
Case 2
PRINT "вторник"
Case 3
PRINT "среда"
Case 4
PRINT "четверг"
Case 5
PRINT "пятница"
Case 6
PRINT "суббота"
Case 0
PRINT "воскресенье"
END select
Контрольная работа.