Составители:
Рубрика:
10. Можно ли к данным перечислимого типа применить
стандартные процедуры ввода-вывода?
11. Какие средства имеются в языке Паскаль для ввода-
вывода значений переменных перечислимого типа?
5.2. Упражнения (перечислимый тип)
1. Что будет напечатано в результате выполнения цикла
в следующем фрагменте программы:
Type colour = (green, yellow, red) ;
Var c : colour ;
Begin
For с : = green To yellow Do
Write ( Ord (c ) ) ;
End.
2. Измените фрагмент программы из предыдущего во-
проса, заменив цикл For циклом While.
3. В разделе типов описан список деталей:
Type список деталей = (шуруп, гайка, винт, шпилька) ;
Написать фрагмент программы, обеспечивающий распе-
чатку названия детали по указанному номеру.
4. Пусть имеются описания:
Type day = (monday, tuesday, wednesday, thursday, friday,
saturday, sunday);
pmonth = ( m28, m29, m30 , m31 ) ;
Var wday, weekday : day ;
kday: pmonth ;
a) установите, какие значения могут принимать пере-
менные weekday, kday;
b) определите, допустимы ли следующие присваивания:
weekday : = friday ;
kday : = m27 ;
weekday : = m30 ;
kday : = Ord ( thursday ) ;
c) вычислите значения выражений:
monday < sunday ;
tuesday = m 28 ;
wednesday <= wednesday ;
tuesday <> m29 ;
40
10. Можно ли к данным перечислимого типа применить
стандартные процедуры ввода-вывода?
11. Какие средства имеются в языке Паскаль для ввода-
вывода значений переменных перечислимого типа?
5.2. Упражнения (перечислимый тип)
1. Что будет напечатано в результате выполнения цикла
в следующем фрагменте программы:
Type colour = (green, yellow, red) ;
Var c : colour ;
Begin
For с : = green To yellow Do
Write ( Ord (c ) ) ;
End.
2. Измените фрагмент программы из предыдущего во-
проса, заменив цикл For циклом While.
3. В разделе типов описан список деталей:
Type список деталей = (шуруп, гайка, винт, шпилька) ;
Написать фрагмент программы, обеспечивающий распе-
чатку названия детали по указанному номеру.
4. Пусть имеются описания:
Type day = (monday, tuesday, wednesday, thursday, friday,
saturday, sunday);
pmonth = ( m28, m29, m30 , m31 ) ;
Var wday, weekday : day ;
kday: pmonth ;
a) установите, какие значения могут принимать пере-
менные weekday, kday;
b) определите, допустимы ли следующие присваивания:
weekday : = friday ;
kday : = m27 ;
weekday : = m30 ;
kday : = Ord ( thursday ) ;
c) вычислите значения выражений:
monday < sunday ;
tuesday = m 28 ;
wednesday <= wednesday ;
tuesday <> m29 ;
40
Страницы
- « первая
- ‹ предыдущая
- …
- 38
- 39
- 40
- 41
- 42
- …
- следующая ›
- последняя »
