избор на изявление случай
Преди това бяхте представени условен израз Ако, което позволява на програмата да изпълнява реализации за определен клон на стойността на булеви условия. Използване на няколко оператора, ако разклонения може да се извърши от условията на последователност. В фрагмент показва като с помощта на поредица от оператори Ако можете да преобразувате число (0-9), за да му словесно представителство:
ако Ziphra = 0
след това
пиша ( "нула");
ако Ziphra = 1
след това
пиша ( "единица");
ако Ziphra = 2
след това
пиша ( "Two");
Вие вероятно вече сте си представите как този подход е монотонен и скучен. Паскал език предвижда за тази цел друга контролна структура (случай оператор избор), който ви позволява да се изгради разклонението на редица условия, във форма, по-удобен за читателите.
изберете оператора избира една от няколко възможности за удължаване на програмата. Параметър, чрез която изборът е т.нар изберете бутона (или селектора) - израз на всякакъв вид (освен REAL и STRING тип).
Общата форма на следното:
При изразяване на
value1. оператор (група оператор);
value2. оператор (група оператор);
.
valueN. оператор (група от оператори)
друг оператор (група оператор);
приключи;
изберете изявление работи по следния начин. Първо, изчислена стойност на израза след запазена дума случая, а след това изпълнява отчета (или композитен оператора), съответстващ на резултата от израза за изчисление.
Това може да се случи, че в списъка за избор няма да се появи постоянен равно на изчислената стойност на ключа. В този случай, управлението се предава на оператора стои зад думата друго.
Дело номер мод 2 от
0. writeln (НОМЕР "- четен брой")
друго. writeln (НОМЕР "- нечетно число ');
приключи;
Ако се изпълнява оператор в продължение на няколко стойности, те могат да бъдат разделени със запетая.
При месец
1, 2, 3. writeln ( "първото тримесечие ');
4, 5, 6. writeln ( "второто тримесечие);
7, 8, 9. writeln ( "Трето тримесечие ');
10, 11, 12. writeln ( 'четвърто тримесечие);
приключи;
Операторът може да бъде не само един прост изявление, но като неразделна и празни твърдения.
Ако операторът е извършил в няколко стойности на селектора успех помежду си, образувайки определен период, то може да се запише в по-кратък начин. Например,
При Chislo на
0-9. пиша ( "Този номер е цифра ');
Погледнете какви опции все още можете да използвате изберете отчета за решаване на проблема.
Задача. Напишете програма преобразуване номера с думи.
Програма NUMBER1;
Var
а, Ь, с. цяло число;
започвам
writeln ( 'Въведете номер ");
readln (а);
ако (а<0) or (a>9)
след това
writeln ( "Този номер не е число")
още
случай на
0. writeln ( "нула");
1. writeln ( "А");
2. writeln ( "две");
3. writeln ( "три");
4. writeln ( "четири");
5. writeln ( "пет");
6. writeln ( "шест ');
7. writeln ( "седем");
8. writeln ( "осем");
9. writeln ( "девет");
приключи;
readln;
Край.
Програма NUMBER2;
Var
а, Ь, с. цяло число;
започвам
writeln ( 'Въведете номер ");
readln (а);
случай на
0. writeln ( "нула");
1. writeln ( "А");
2. writeln ( "две");
3. writeln ( "три");
4. writeln ( "четири");
5. writeln ( "пет");
6. writeln ( "шест ');
7. writeln ( "седем");
8. writeln ( "осем");
9. writeln ( "Девет")
останало writeln ( "Този номер не е цифра ');
приключи;
readln;
Край.
- Напишете алгоритъм, за да получите вербална името на училищни класове.