5.72. Скласти алгоритм виведення назв:
а) днів тижня;
б) місяців у році;
в) кольорів спектру;
г) шахових фігур.
Розв'язок а)
Алг Дні_Тижня це
тип тиждень=(пн,вт,ср,чт,пт,сб,нд);
змін день:тиждень;
поч
для день¬пн до нд повт
показати (день)
кц
ка.
5.73. За назвою країни визначити назву її столиці.
Вказівка. Розглянути типи:
тип країна=(Австрія,Болгарія,Італія,Україна,Франція,Швеція);
столиця=(Відень,Софія,Рим,Київ,Париж,Стокгольм).
5.74. За українською назвою мови програмування визначити її англійську назву.
5.75. За назвою країни визначити назву континенту, де вона розташована.
5.76. За назвою місяця визначити сезон (пору року), на який цей місяць приходиться.
Розв'язок.
Алг Пора_року це
тип сезон=(зима,весна,літо,осінь);
місяць=(січ,лют,бер,квіт,трав,чер,лип,сер,вер,жов,лис,груд);
змін m:місяць;
s:сезон;
поч
взяти(m);
вибрати m із
|груд,січ,лют:s¬зима;
|бер,квіт,трав:s¬весна;
|чер,лип,сер:s¬літо;
|вер,жов,лис:s¬осінь
кв;
показати(s)
ка.
5.77. Довжину відрізка, задану в міліметрах, сантиметрах, дециметрах чи кілометрах замінити на величину цієї довжини в метрах.
5.78. Надрукувати слово з заданого переліку: (степ, біль, зошит, двері) у заданому відмінку і однині.
5.79. Корабель йшов за деяким курсом, потім його курс було змінено згідно даному наказу. Визначити новий курс корабля.
Вказівка. Розглянути типи
тип курс =(північ,схід,південь,захід);
наказ=(вперед, вправо, вліво, назад);
5.80. За літерою-цифрою d від '0' до '5' визначити назву цієї цифри.
5.81. Для натурального числа k від 1 до 99 надрукувати фразу "Мені k років", враховуючи при цьому, що при деяких значеннях k слово "років" треба замінити на слово "рік" або "роки".
Розв'язок.
Алг Вік це
змін k:1..99; l:0..9;
поч
взяти(k);
показати('Мені ',k,' ');
якщо (k<=19)&(k>=11) то
показати('років')
інакше
l¬k mod 10;
вибрати k із
|0,5..9: показати('років');
|1: показати('рiк');
|2..4:показати('роки')
кв
кр
ка.
5.82. Для натурального числа k надрукувати фразу "Ми знайшли k грибів у лісі", погодивши закінчення слова "гриб" з числом k.
5.83. Визначити кількість днів в заданому місяці.
5.84. Визначити дату наступного дня.
5.85. Визначити день тижня у 1994 році за його датою, знаючи, що 7 січня 1994 року - субота.
5.86. Визначити дату k-го за рахунком дня високосного року.
5.87. Визначити порядковий номер того дня високосного року, який має задану дату.
Розв'язок
Алг Номер_дня це
тип місяць=(січ, лют, бер, квіт, трав, чер, лип, сер, вер, жов, лис, груд);
змін m,m1:місяць;
k:0..366; d:1..31;
поч
взяти(d,m);
m1¬січ; k¬d;
поки m1<m повт
вибрати m1 із
|січ,бер,трав,лип,сер,жов: k¬k+31;
|лют:k¬k+29;
|квіт,чер,вер,лис:k¬k+30
кв;
m1¬succ(m1)
кц;
показати(k)
ка.
Немає коментарів:
Дописати коментар