ReSQL.ru
     
powered by simpleCommunicator - 2.0.54     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / помогите решить
17 сообщений из 17, страница 1 из 1
помогите решить
    #37551625
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
даны два целых числа: А и В. проверить, верно ли утверждение :числа А и В имеют одинаковую четность) пожалуйста помогите никак не врубаюсь(
...
Рейтинг: 0 / 0
30.11.2011, 11:54
| Ответить | Цитировать | Написать  
помогите решить
    #37551637
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
А во что, собственно не врубаешься? Как определить, четное число или нет?
...
Рейтинг: 0 / 0
30.11.2011, 12:00
| Ответить | Цитировать | Написать  
помогите решить
    #37551732
OSIP_1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OSIP_1
Участник
воваава,

Это же школьная задачка!!
...
Рейтинг: 0 / 0
30.11.2011, 12:39
| Ответить | Цитировать | Написать  
помогите решить
    #37551931
Фотография alex77755
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
alex77755
Участник
Код: plaintext
1.
2.
3.
A = Int( 200  * Rnd +  55 )
B = Int( 200  * Rnd +  55 )
Четность = IIf(A Mod  2  = B Mod  2 , " одинаковую ", " разную ")
MsgBox "числа " & A & " и " & B & " имеют " & Четность & "чётность",  64 , ""
...
Рейтинг: 0 / 0
30.11.2011, 13:42
| Ответить | Цитировать | Написать  
помогите решить
    #37551955
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
Два числа имеют одинаковую чётность, если их сумма (или разность) чётна.
...
Рейтинг: 0 / 0
30.11.2011, 13:51
| Ответить | Цитировать | Написать  
помогите решить
    #37552263
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
Мастям игральных карт присвоены порядковые номера:1-пики, 2-трефы, 3-бубны, 4-червы. Достоинству карт, старших десятки,присвоены номеры: 11-валет, 12-дама, 13-король, 14-туз. Даны два целых числа: N-достоинство (6<=N<=14)и М-масть карты(1<=М<=4). Вывести название соответствующей карты вида "шестерка бубен", "дама червей","туз треф" и т.п. ПОМОГИТЕ ПОЖАЛУЙСТА(
...
Рейтинг: 0 / 0
30.11.2011, 15:36
| Ответить | Цитировать | Написать  
помогите решить
    #37552268
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
Мастям игральных карт присвоены порядковые номера:1-пики, 2-трефы, 3-бубны, 4-червы. Достоинству карт, старших десятки,присвоены номеры: 11-валет, 12-дама, 13-король, 14-туз. Даны два целых числа: N-достоинство (6<=N<=14)и М-масть карты(1<=М<=4). Вывести название соответствующей карты вида "шестерка бубен", "дама червей","туз треф" и т.п. ПОМОГИТЕ ПОЖАЛУЙСТА(
...
Рейтинг: 0 / 0
30.11.2011, 15:37
| Ответить | Цитировать | Написать  
помогите решить
    #37552308
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
вовааваПОМОГИТЕпомочь? Или сделать за тебя? ты уж сразу с терминологией определись

А вообще alex77755 не услышал даже ни слова благодарности, стоит ли дальше что-то делать?
...
Рейтинг: 0 / 0
30.11.2011, 15:52
| Ответить | Цитировать | Написать  
помогите решить
    #37552705
Below273
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Below273
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
if n =  6  then text1.text = "шестёрка"
elseif n =  7  then text1.text = "семёрка"
'.............................................
elseif n= 14  then text1.text = "туз"
end if
if m =  1  then text1.text = text1.text & "пики"
elseif '.........................
end if
...
Рейтинг: 0 / 0
30.11.2011, 18:18
| Ответить | Цитировать | Написать  
помогите решить
    #37552751
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Below - худший вариант, который мог быть предложен.
Ты про Array, ну или хотя бы про Case ты что-нибудь слышал?
ЗЫ: вопрос риторический, ответ понятен.
...
Рейтинг: 0 / 0
30.11.2011, 18:46
| Ответить | Цитировать | Написать  
помогите решить
    #37553287
не быдло
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
не быдло
Гость
Below273пнх
Вот ведь быдло то!!
...
Рейтинг: 0 / 0
01.12.2011, 08:40
| Ответить | Цитировать | Написать  
помогите решить
    #37553291
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
спасибо всем, выручили) спасибо!)
...
Рейтинг: 0 / 0
01.12.2011, 08:45
| Ответить | Цитировать | Написать  
помогите решить
    #37561007
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
помогите с лабараторной пожалуйста, программист никакой из меня, заранее спасибо большое)
1)вычислить значение выражения Y при x=2.5, включающего 10 членов: Y= x/Ln(x) + (x+1)/Ln(x+1) + (x+2)/Ln(x+2) +... ответ должен быть такой: Y=36.30091

2)найти сумму ряда с заданной точностью e=10^-3: S= 2 + 3/4 + 4/9 + 5/16 +...
...
Рейтинг: 0 / 0
06.12.2011, 14:23
| Ответить | Цитировать | Написать  
помогите решить
    #37561027
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Пора с поциента брать деньги...
...
Рейтинг: 0 / 0
06.12.2011, 14:33
| Ответить | Цитировать | Написать  
помогите решить
    #37561057
AndreyMp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreyMp
Участник
авторY= x/Ln(x) + (x+1)/Ln(x+1) + (x+2)/Ln(x+2) + :) Без логарифмической линейки наверно никак :)
авторпрограммист никакой из меня Извините, Вам лет то сколько? Математику еще не але?
...
Рейтинг: 0 / 0
06.12.2011, 14:47
| Ответить | Цитировать | Написать  
помогите решить
    #37563579
воваава
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
воваава
Гость
ну решите пожалуйста((я не могу((
...
Рейтинг: 0 / 0
07.12.2011, 17:29
| Ответить | Цитировать | Написать  
помогите решить
    #37565701
AndreyMp
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreyMp
Участник
Блин, тут делов то.
Код: vbnet
1.
2.
3.
4.
5.
6.
x = 2.5
Y = 0
For i = 0 To 9
  Y = Y + (x + i) / Log(x + i)
Next i
MsgBox Y


допиливай сам.
...
Рейтинг: 0 / 0
08.12.2011, 16:38
| Ответить | Цитировать | Написать  
17 сообщений из 17, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / помогите решить
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=90&tid=2158250]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 34ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 14ms
total:  148ms
созд. / загр.: 148ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]