Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.77/13: Рейтинг темы: голосов - 13, средняя оценка - 4.77
0 / 0 / 0
Регистрация: 14.02.2017
Сообщений: 10
1

Знаки зодиака по введенной дате

14.02.2017, 23:35. Показов 2607. Ответов 3

Даны два целых числа: D (день) и M (месяц), определяющие правильную дату. Вывести знак Зодиака, соответствующий этой дате: «Водолей» (20.1–18.2), «Рыбы» (19.2–20.3), «Овен» (21.3–19.4), «Телец» (20.4–20.5), «Близнецы» (21.5–21.6), «Рак» (22.6–22.7), «Лев» (23.7–22.8), «Дева» (23.8–22.9), «Весы» (23.9–22.10), «Скорпион» (23.10–22.11), «Стрелец» (23.11–21.12), «Козерог» (22.12–19.1).
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.02.2017, 23:35
Ответы с готовыми решениями:

Определение знака зодиака по дате рождения
Даны два целых числа: D(день) и M(месяц), определяющие правильную дату. Вывести знак зодиака,...

Определение знака зодиака по дате рождения
Ребята помоги плизз.... Добавлено через 26 секунд Определение знака зодиака по дате рождения на...

По введенной дате определить знак Зодиака
1. Cоздайте Windows-приложение, которое по введенной дате определяет знак Зодиака. Помогите...

Вывести знак Зодиака, соответствующий введенной дате
21. Даны два целых числа: D (день) и M (месяц), определяющие правильную дату. Вывести знак Зодиака,...

__________________
3
5543 / 1348 / 148
Регистрация: 08.02.2009
Сообщений: 4,081
Записей в блоге: 30
15.02.2017, 20:18 2
Тут есть VBS-проект* для nubriuska:
Цитата Сообщение от Sasha_Smirnov Посмотреть сообщение
Годные_Звери.rar (2.1 Кб, 9 просмотров)
Да и код из Excel-приложения в принципе и для VB подходит (там эксселевских фишек нет):
Цитата Сообщение от Sasha_Smirnov Посмотреть сообщение
ГодныеЗвери.xls (54.5 Кб, 1 просмотров)


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


И вот Natashamakros,
Цитата Сообщение от Natashamakros Посмотреть сообщение
студентка 2 курса института
(теперь уже пятикурсница (почти восьмиклассница)), может, тоже поделится — скинет:
Цитата Сообщение от Natashamakros Посмотреть сообщение
готовый пример!
В похожих темах (внизу) есть простой (но шуточный) код Toxa33rus:
Цитата Сообщение от Toxa33rus Посмотреть сообщение
…какой там где и когда зодиак не знаю.
________
* там ввода дат нет, но в 15-й строке функции AnnualRotation его можно организовать
0
2 / 2 / 3
Регистрация: 07.02.2017
Сообщений: 24
17.02.2017, 00:45 3
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Command1_Click()
 
Dim k As Integer, SLeft As String, SRight As String, d As Single, S As String
 
'на всякий случай убираем пробелы
S = Replace(Text1.Text, " ", "")
 
'меняем в дате местами день и месяц
k = InStr(S, ".")
SLeft = Left(S, k - 1)
SRight = Right(S, Len(S) - k)
d = Val(SRight & "." & SLeft)
 
If d >= 1.2 Then S = "Водолей"
If d >= 2.19 Then S = "Рыбы"
If d >= 3.21 Then S = "Овен"
If d >= 4.2 Then S = "Телец"
If d >= 5.21 Then S = "Близнецы"
If d >= 6.22 Then S = "Рак"
If d >= 7.23 Then S = "Лев"
If d >= 8.23 Then S = "Дева"
If d >= 9.23 Then S = "Весы"
If d >= 10.23 Then S = "Скорпион"
If d >= 11.23 Then S = "Стрелец"
If d >= 12.22 Or d <= 1.19 Then S = "Козерог"
 
Label1.Caption = S
 
 
End Sub
1
oh my god
1444 / 783 / 159
Регистрация: 05.01.2016
Сообщений: 2,307
Записей в блоге: 8
17.02.2017, 10:34 4
Зацените этот гороскоп ...
https://www.cyberforum.ru/post7227068.html
Честно говоря я писал ))

Добавлено через 3 минуты
Забыл сказать работает с WinRar'ом
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.02.2017, 10:34

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

Программа выводит знак зодиака по введённой дате и месяцу
Нужно написать программу которая которая выводит знак зодиака по введённой дате и месяцу, в одну...

По введенной дате (число, месяц) определить знак зодиака. (Pascal)
помогите, завтра нужно сдать.. вроде делается через case как-то, но я хз как(

Пользовательский метод который определяет знак зодиака по введенной дате рождения
Необходимо создать метод, который определяет знак зодиака человека по введенной дате рождения

По введенной дате рождения дополнить файл строками соответсвующего знака Зодиака
Ось такє завдання, допоможіть По уведеній даті народження (день і місяць, форма уведення у файл...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.