Предположим, что g — это граф, состоящий из 101 вершины и 100 ребер. какие из следующих
утверждений могут быть справедливы?
=== ответы (множественный выбор) ===
1. g содержит циклы
2. g не содержит циклов
3. g — это дерево
4. g — это лес
5. g — это не связный граф
Действие книг происходит на фантастической планете. Планета эта, как понятно из названия, плоская и имеет форму диска. В этом мире свои законы физики: свет здесь движется медленно, магия материальна, а в радуге восемь цветов. В этом мире возможно всё; то, что мы считаем мифами, там — правда. Плоский мир покоится на спинах четырёх слонов, которых держит гигантская черепаха Великий А’Туин, плывущая сквозь космическое пространство.
Плоский мир населен различными расами: тролли, гномы, эльфы, големы, вампиры, оборотни, зомби — все они не просто сосуществуют в этом мире, но и борются за свои права и равенство при приеме на работу.
Книги о Плоском мире можно условно разделить на несколько подциклов, каждый из которых имеет своих героев и место действия (при этом они могут пересекаться). Герои основных подциклов:
I. Ринсвинд — «Волшебник», выпускник Незримого Университета, абсолютно не к магии по мнению преподавателей Незримого Университета и величайший волшебник Плоского мира по факту: он мир. Владелец Сундука.
II. Ланкрские Ведьмы. Самые известные представительницы — матушка Ветровоск, сильнейшая ведьма Диска, и нянюшка Ягг, автор «Песни про ёжика». Их магия — особая, иная, чем у волшебников: чтобы зажечь огонь, ведьма долго и пристально смотрит на бревно, пока бревно не сгорит со стыда.
III. Смерть — антро сущность мужского рода (скелет с косой на белом коне)
IV. Городская стража — охраняет порядок Анк-Морпорка, самого большого города Плоского Мира.
V. Тиффани Болит — героиня «детского» подцикла, юная ведьма из Мела.
VI. Мойст фон Липвиг — герой одного из городских подциклов, авантюрист, принятый на государственную службу Анк-Морпорка.
Книги серии «Плоский мир» завоевали громадную популярность благодаря тонкому юмору и глубокой, но ненавязчивой философии.
(на основе статьи из энциклопедии)
var r1, r2:real; {Задаем переменные}
c:byte;
begin {Начало программы}
write ('Введите 1 сопротивление... '); {Вывод сообщения о вводе данных}
readln (r1); {Ввод данных с клавиатуры}
write ('Введите 2 сопротивление... '); {Вывод сообщения о вводе данных}
readln (r2); {Ввод данных с клавиатуры}
write ('Если соединение параллельное, то нажмите клавишу 1, если соединение последовательное - нажмите 0...'); {Вывод сообщения о вводе данных}
readln (c); {Ввод данных с клавиатуры}
if c=1 {условие}
then writeln ('Сопротивление электрической цепи, соединенной параллельно=',(r1*r2)/(r1+r2)) {Вывод значения, при параллельном соединении}
else writeln ('Сопротивление электрической цепи, соединенной последовательно=',(r1+r2)); {Вывод значения, при последовательном соединении}
end. {Конец программы}