Скачать программы Все программы автора1.7.2.Оператор выбораОператор служит для выбора одного из помеченных вариантов действия (операторов), в зависимости от значения "параметра". Оператор имеет вид: Case "параметр" Of "список помеченных операторов" Else "оператор" End; Здесь "параметр" - выражение или переменная порядкового типа. Из "списка помеченных операторов" выполняется оператор с меткой, включающей значение "параметра" , иначе оператор после слова Else. Конструкция Else "оператор" может отсутствовать. Напомним, что "оператор" может иметь вид: Begin "операторы" end; Пример операторов для определения порядка целого числа N от 0 до 999: case N of 0..9: writeln(' однозначное '); 10..99: writeln(' двузначное '); 100..999: writeln(' трехзначное ') else writeln(' Число "N" не входит в указанный диапазон ') end; Приведем пример программы случайного предсказания одного из десяти вариантов ближайшего будущего с вероятностью 1/20, в остальных случаях - вы "неудачник". PROGRAM FUTURE; var N: word; Begin writeln('ПРЕДСКАЗАНИЕ БУДУЩЕГО'); Randomize; N:=Random(20)+1; { N - случайное число от 1 до 20 } writeln; write(' Вас ожидает _'); case N of 1: writeln(' счастье '); 6: writeln(' здоровье '); 2: writeln(' пятерка '); 7: writeln(' деньги '); 3: writeln(' дорога '); 8: writeln(' любовь '); 4: writeln(' двойка '); 9: writeln(' встреча '); 5: writeln(' болезнь '); 10: writeln(' дети ') else writeln(' неудача ') end; writeln(' Нажми Enter'); readln; END. Здесь функция Random(x) генерирует случайное число, с равномерной плотностью распределения на заданном интервале. Для инициализации распределения в начале программы необходимо вызвать процедуру Randomize.
Практическое задание N 1. 4
1. Назначить дежурного в классе из списка 10 учеников с вероятностью 1/15, в остальных случаях дежурит учитель. 2. Выбрать место отдыха в отпуске из списка 10 мест, предлагаемых туристическим агентством с вероятностью 1/30 , в остальных случаях вы отдыхаете дома. 3. Вывести на экран сообщение в зависимости от введенного значения оценки ( по десятибалльной системе ), например: 1. . 2: плохо, 3. . 5: удовлетворительно, и т. д. , иначе - неправильный ввод данных. 4. Вывести на экран сообщение в зависимости от введенного значения температуры воздуха ( от - 50 до +50 0 С ), например: - 50. . - 20: очень холодно, - 19. . - 10: холодно, и т. д. , иначе - неправильный ввод данных. |