12 Июня 2024
1

Глава 50 (CYOA051)

Как ты ни стараешься идти по своим следам, но больше нигде не видно ни единой серебряной нити. Потратив на поиски несколько часов, останавливаешься у небольшого пруда попить воды. Но увы – на поверхности плавает толстый слой пены, пить такую воду никто не станет. Страдая от жажды и усталости, садишься на берегу пруда отдохнуть.

Пытаешься сообразить, как быть дальше. Тем временем ты срываешь стручок с какого-то растения – раньше ты таких точно не видела. Раскрываешь стручок и лениво бросаешь семена одно за другим в затхлый пруд. Моргаешь, не веря своим глазам – в пене появляется просвет!

Быстро срываешь ещё стручок и высыпаешь семена в пруд. Потрясённо глядишь, как вода становится такой чистой, что видно дно. Делаешь пробный глоток – вода свежайшая. Задыхаясь от восторга, срываешь все странные стручки, что можешь найти.

Узнав, что ты можешь очистить воду, селяне принимают тебя обратно. Сохраняя в тайне место, где растут стручки, ты со временем заработала неплохое состояние, очищая и другие колодцы таинственными семенами. Вскоре твои семена заменили единорожьи рога как самый надёжный метод очистки воды.

Конец

0

Ожидая такси

В четверг ждал такси на улице, оно уже подъезжало. Тут мимо проехала реанимация, за ней 3 скорые, автобус и, видимо, машина сопровождения. Тут подъехало мое такси, и пока садился, нас обогнали еще 4 скорые. Такая вот колонна. Таксиста спросил, он сказал что регулярно такие встречает. Везут с вокзала в военный госпиталь.

1
Вопрос из ленты «Эксперты»

Помогите, пожалуйста, дописать код в 1 с

  • Как написать так, чтобы в случае если соответствие не найдено, было выведено сообщение с ошибкой "Регион не определен". Поле ввода при этом должно быть подсвечено с текстом "ошибка".

&НаКлиенте

Процедура ОпределитьРегион(Команда)

Если Прав(НомерАвтомобиля, 2) = "78" Тогда

ОписаниеОповещения = Новый ОписаниеОповещения("ПроверкаРегиона", ЭтотОбъект);

ПоказатьВопрос(ОписаниеОповещения, "Регион - 78: Санкт-Петербург. Очистить поле Номер автомобиля?",

РежимДиалогаВопрос.ДаНетОтмена);

ИначеЕсли НомерАвтомобиля = Неопределено Тогда

Сообщение = Новый СообщениеПользователю;

Сообщение.Текст = "Регион не определен";

Сообщение.Поле = "НомерАвтомобиля";

Сообщение.Сообщить();

КонецЕсли;

КонецПроцедуры

&НаКлиенте

Процедура ПроверкаРегиона(Результат, ПараметрыЗаписи) Экспорт

Если Результат = КодВозвратаДиалога.Да Тогда

НомерАвтомобиля = "";

КонецЕсли;

КонецПроцедуры

Показать полностью
Мои подписки
Подписывайтесь на интересные вам теги, сообщества, авторов, волны постов — и читайте свои любимые темы в этой ленте.
Чтобы добавить подписку, нужно авторизоваться.

Отличная работа, все прочитано! Выберите