На ввод времени суток вывести соответствующие пожелания доброго утра, дня, вечера и спокойной ночи

@Katara45 · Регистрация: 23.05.2013

Студворк — интернет-сервис помощи студентам

Помогите! Сколько вожусь уже с этим кодом, никак не выходит то, что требуется в задании..

"Составить программу, которая на ввод времени суток выводит соответствующие пожелания доброго утра, дня, вечера и спокойной ночи."

У меня получается только ввод чисел соответственно времени суток: 1 = утро, 2 = день, ...

@Апострофф · 23.05.2013, 09:25

Katara45, приведите свой код, будем править и укажите границы между ночью и утром, утром и днем и т.д.

@Katara45 · 23.05.2013, 09:27 **[ТС]**

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim m As Single
m = Val(InputBox("Введите число времени суток соответственно: утро, день, вечер, ночь"))
Select Case m
Case Is = 1
MsgBox " Доброго утра"
Case Is = 2
MsgBox " Доброго дня"
Case Is = 3
MsgBox " Доброго вечера"
Case Is = 4
MsgBox " Спокойной ночи"
Case Else
MsgBox "ошибочный ввод значения"
End Select
End Sub

@gaw · 23.05.2013, 09:28

Visual Basic
1
Print Choose(1 + DatePart("h", "19:12:8") \ 6, "ночь", "утро", "день", "вечер")

@Katara45 · 23.05.2013, 09:46 **[ТС]**

Разобралась)) Спасибо)))

У Вас шикарный сайт))

13.11.2013, 22:35

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

@JoraVoenyjHaker · 14.11.2013, 00:53

жаль я в это время спал...
я бы подсказал...

не стал архив делать
на форме нужен компонент с именами Timer1 и Text1
вот строчки

Модуль формы...

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Option Explicit
 
Private Sub Form_Load()
    Timer1.Interval = 1000 'Интервал вызова события таймера 1 сек
End Sub
 
Private Sub Timer1_Timer()
    Select Case Format(Time, "h")
    Case Is >= 8
        Text1 = "Доброе утро"
    Case Is >= 12
        Text1 = "Добрый день"
    Case Is >= 18
        Text1 = "Добрый вечер"
    Case Is >= 22
        Text1 = "Доброй ночи"
    Case Else
        Text1 = "Ночь ...."
    End Select
End Sub

Добавлено через 19 минут
Жаль что проверить и заценить
сможете не сразу, а в течении 24-х часов наблюдения

@njeriu · 14.11.2013, 01:44

Круто!
От 0 до 7 будет "Ночь ....", а от 8 до 23 всегда "Доброе утро"

@JoraVoenyjHaker · 14.11.2013, 03:58

извиняюсь

Откройте... Вот как надо !

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Option Explicit
 
Private Sub Form_Load()
    Timer1.Interval = 1000
End Sub
 
Private Sub Timer1_Timer()
    Select Case Format(Time, "h")
    Case 6 To 11
        Text1 = "Доброе утро"
    Case 12 To 17
        Text1 = "Добрый день"
    Case 18 To 21
        Text1 = "Добрый вечер"
    Case 22 To 23
        Text1 = "Доброй ночи"
    Case Else
        Text1 = "Ночь ...."
    End Select
End Sub

njeriu спасибо что указали на ошибку
а то кто-нибудь бы сначало прождал 24 часа....
затем, не дождавшись результатов написал бы
не-лицеприятный отзыв, а я бы так и не понял
за что меня критикуют, потому-что удалил исходники....

@njeriu · 14.11.2013, 04:53

Всегда пожалуйста!

@JoraVoenyjHaker · 14.11.2013, 05:40

Я вот тут подумал....
девушки очень любят, неожиданные,
приятные комплименты, с сердечками-цветочками
можно закинуть запасной файл в программу
со списком самых приятнейших стишков и комплиментов для текущего юзера
подставляя его доменное имя....
в определенное время суток +неожиданный комплимент....

чет фантазия разыгралась...

Добавлено через 12 минут
Я наверное доберусь...
сделаю такую программку

@njeriu · 15.11.2013, 16:12

В Слаке нечто-подобное уже есть. При каждом логине анекдоты травят.

@JoraVoenyjHaker · 15.11.2013, 18:12

Сообщение от njeriu

В Слаке нечто-подобное уже есть. При каждом логине анекдоты травят.

это где такое ?

@njeriu · 24.11.2013, 11:19

В консоли.

@Pro_grammer · 24.11.2013, 13:25

Сообщение от JoraVoenyjHaker

Я наверное доберусь...
сделаю такую программку

У меня есть, только не стихи, а время суток говорит. ну тем голосом, что в прикольных кодах я приводил. И по-русски и по-английски, два варианта.
Сами часы тоже симпатичные, в стиле Win7

@JoraVoenyjHaker · 24.11.2013, 13:40

Жаль у меня нет такова плагина, чтоб можно на русском проговаривать
у меня XP-юшка, возможно микрософты не предусмотрели слепых русских юзеров )))

@The trick · 24.11.2013, 13:52

Сообщение от JoraVoenyjHaker

Жаль у меня нет такова плагина, чтоб можно на русском проговаривать
у меня XP-юшка, возможно микрософты не предусмотрели слепых русских юзеров )))

Можно сделать базу слов и проигрывать их, так можно более качественней сделать.

@Pro_grammer · 24.11.2013, 13:53

Сообщение от JoraVoenyjHaker

у меня XP-юшка, возможно микрософты не предусмотрели слепых русских юзеров )))

Да нет, всё они предусмотрели. Просто надо голосовые движки ставить самому. У меня к примеру один их лучших поставлен на XP - Acapela Alyona. Погугли и найдешь не менее десятка разных движков, как платных, так и бесплатных.
От Мелкософта тоже есть русский, вроде Светлана и Борис, но он отвратительно говорит.

Голосовой движок от известного производителя Acapela с русским голосом Alyona.
Поддержка SAPI4 и SAPI5 стандартных программных интерфейсов, чтобы гарантировать мгновенную совместимость с тысячами приложений, использующих речь, таких, как для чтения с экрана, экранные лупы и так далее.
Полный контроль над голосом, такие параметры, как скорость чтения, объем, высота, паузы, настройки эквалайзера и режим чтения (предложение за предложением, слово за словом и правописание).
Voice Manager легко создаёт собственные голоса с любимыми настройками.
Лексикон менеджер для настройки и и тонкой настройки произношения аббревиатур, имен и любых других слов.
KeySpeaker - приложение для написания и чтения в реальном времени во время набора текста в любом приложении для Windows.
SpeechPad - приложение для чтения вслух любого текстового файла.
SAPI4 теги для контроля чтения на лету, в том числе поддержка переключения языка в середине предложения.
Улучшено распознавание числительных, единиц измерения, показаний времени и даты, валют и интернет-адресов.

@JoraVoenyjHaker · 24.11.2013, 15:05

Сообщение от Запрос в гугл

Голосовой движок от известного производителя Acapela с русским голосом Alyona.
Поддержка SAPI4 и SAPI5 стандартных программных интерфейсов, чтобы гарантировать мгновенную совместимость с тысячами приложений, использующих речь, таких, как для чтения с экрана, экранные лупы и так далее.
Полный контроль над голосом, такие параметры, как скорость чтения, объем, высота, паузы, настройки эквалайзера и режим чтения (предложение за предложением, слово за словом и правописание).
Voice Manager легко создаёт собственные голоса с любимыми настройками.

И ответ гугла )))

@JoraVoenyjHaker · 24.11.2013, 15:09

Вообщето это тема меня заинтерисовала...
думаю спрос на программки с качественным проговором текста
будет только наростать...

Новые блоги и статьи Все статьи Все блоги /
Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это дополнительная запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .

@Katara45 0 / 0 / 1 Регистрация: 23.05.2013 Сообщений: 11

	На ввод времени суток вывести соответствующие пожелания доброго утра, дня, вечера и спокойной ночи 23.05.2013, 09:10. Показов 9494. Ответов 19 Метки нет (Все метки) Помогите! Сколько вожусь уже с этим кодом, никак не выходит то, что требуется в задании.. "Составить программу, которая на ввод времени суток выводит соответствующие пожелания доброго утра, дня, вечера и спокойной ночи." У меня получается только ввод чисел соответственно времени суток: 1 = утро, 2 = день, ... 0

@Апострофф 9908 / 3924 / 742 Регистрация: 11.10.2011 Сообщений: 5,904
	23.05.2013, 09:25
	Katara45, приведите свой код, будем править и укажите границы между ночью и утром, утром и днем и т.д. 1

@Katara45 0 / 0 / 1 Регистрация: 23.05.2013 Сообщений: 11
	23.05.2013, 09:46 [ТС]
	Разобралась)) Спасибо))) У Вас шикарный сайт)) 0

ildar1108
	13.11.2013, 22:35
	подскажите пожалуйста как будет выглядеть полностью код к этому заданию - написать программу которая при вводе времени суток выдает соответствующие пожелания доброго дня, ночи, вечера и утра не могу разобраться((

@njeriu 1 / 1 / 0 Регистрация: 20.09.2013 Сообщений: 23
	14.11.2013, 01:44
	Круто! От 0 до 7 будет "Ночь ....", а от 8 до 23 всегда "Доброе утро" 1

@njeriu 1 / 1 / 0 Регистрация: 20.09.2013 Сообщений: 23
	14.11.2013, 04:53
	Всегда пожалуйста! 0

@JoraVoenyjHaker Заблокирован
	14.11.2013, 05:40
	Я вот тут подумал.... девушки очень любят, неожиданные, приятные комплименты, с сердечками-цветочками можно закинуть запасной файл в программу со списком самых приятнейших стишков и комплиментов для текущего юзера подставляя его доменное имя.... в определенное время суток +неожиданный комплимент.... чет фантазия разыгралась... Добавлено через 12 минут Я наверное доберусь... сделаю такую программку 0

@njeriu 1 / 1 / 0 Регистрация: 20.09.2013 Сообщений: 23
	15.11.2013, 16:12
	В Слаке нечто-подобное уже есть. При каждом логине анекдоты травят. 0

@njeriu 1 / 1 / 0 Регистрация: 20.09.2013 Сообщений: 23
	24.11.2013, 11:19
	В консоли. 0

@JoraVoenyjHaker Заблокирован
	24.11.2013, 13:40
	Жаль у меня нет такова плагина, чтоб можно на русском проговаривать у меня XP-юшка, возможно микрософты не предусмотрели слепых русских юзеров ))) 0

@JoraVoenyjHaker Заблокирован
	24.11.2013, 15:09
	Вообщето это тема меня заинтерисовала... думаю спрос на программки с качественным проговором текста будет только наростать... 0

На ввод времени суток вывести соответствующие пожелания доброго утра, дня, вечера и спокойной ночи

Решение