![]() |
![]() ![]() v.5.2011.12.30 |
Бесплатные домены для портфолио и электронных визиток |
|
Visual Basic 5.0/6.0 - Числа, математика, финансыВсе примеры / Числа, математика, финансыМагичесткие числа
Автор: Петр (Skript) Пономарев | добавлено: 06.03.2010, 13:34 | просмотров: 1911 (1+) | комментариев: 2 | рейтинг:
Программа показывает магические числа.
![]() КодPrivate Sub Command1_Click() For s = 1 To 9 For d = 0 To 9 For e = 0 To 9 a = s ^ 3 + d ^ 3 + e ^ 3 b = s * 100 + d * 10 + e If a = b Then Print a Next e Next d Next s End Sub
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах. Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Все похожие примеры (всего: 29)
Добавлять комментарии могут только зарегистрированные пользователи сайта. Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации ![]() Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.
|
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
|
|
18 апреля 2011, 19:23