Гость
Войти | Профиль | Очистить
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с задачей / 14 сообщений из 14, страница 1 из 1
30.12.2013, 20:10
    #38516209
ИгорьCCC
ИгорьCCC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Помогите, пожалуйста, решить задачу по бейсику,или хотя бы ссылку киньте, где могут помочь.

p. s. простите, за мой русский

составить программу для решения приведённой ниже задачи, используя команду Select Case. задать данные так, чтобы выбор был из четырех-пяти альтернатив. Использовать две переменные соответствующих типов для величин, которые надо определить и вывести их значения на экран в конце кода, то есть команду вывода применять только один раз после команды Select Case (в теле команды Select Case команды вывода не писать)
ввести название города, вывести население и площадь города
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.12.2013, 21:02
    #38516232
ёл
ёл
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
ИгорьCCCПомогите, пожалуйста, решить задачу по бейсику,или хотя бы ссылку киньте, где могут помочь.

p. s. простите, за мой русский

составить программу для решения приведённой ниже задачи, используя команду Select Case. задать данные так, чтобы выбор был из четырех-пяти альтернатив. Использовать две переменные соответствующих типов для величин, которые надо определить и вывести их значения на экран в конце кода, то есть команду вывода применять только один раз после команды Select Case (в теле команды Select Case команды вывода не писать)
ввести название города, вывести население и площадь городакак делал - покажь

только ехешник не скидывай сюда...)))



лучше
кусок кода


и за мой русский
простите тож
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.12.2013, 00:17
    #38516299
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Пособие для студентов и школьников
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.12.2013, 01:12
    #38516311
lbppb
lbppb
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Shocker.Pro,

 
Для новичков форума пора вводить тест, а уж по результатам разрешать постить.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.12.2013, 22:20
    #38516725
ИгорьCCC
ИгорьCCC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Ребята. простите, я болел воспалением лёгких, пропустил месяц. Я вообще хз, как с Select Case делать.
Киньте код, плиз.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.12.2013, 23:01
    #38516730
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
http://msdn.microsoft.com/ru-ru/library/cy37t14y.aspx
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
31.12.2013, 23:02
    #38516731
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
ИгорьCCCЯ вообще хз, как с Select Case делать.новогодняя акция - сделай (что работало) на if-е, выложи сюда, я перепишу под Select Case
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.01.2014, 01:49
    #38516752
ИгорьCCC
ИгорьCCC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Да и через if я не напишу, я и так дуб дубом в бэйсике(раньше был другой учитель, учили паскаль)та ещё и месяц пропустил...
Ну если не можете, то ок, будет у меня трояк за семестр.Извините за беспокойство
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.01.2014, 02:05
    #38516755
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Ладно, так и быть, напиши на паскале, а я перепишу на бейсике
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.01.2014, 14:44
    #38516804
AndreTM
AndreTM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Shocker.Pro,

 
Мы верим!Мы верим в тебя
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.01.2014, 17:38
    #38516831
ИгорьCCC
ИгорьCCC
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
Взял книгу по бэйсику, вроде немного разобрался.Думаете, будет работать?


Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
Private Sub Command1_Click()
Dim Area As Single, Population As Single
Form1.Cls
City$ = InputBox("Киев, Полтава, Умань, Кременчуг, Миргород", "Введите название грода", "Киев")
Select Case City$
Case "Киев"
Area = 839: Population = 2849
Case "Полтава"
Area = 112.5: Population = 296
Case "Умань"
Area = 44.87: Population = 86.9
Case "Кременчуг"
Area = 96: Population = 228
Case "Миргород"
Area = 30: Population = 42.7
Case Else
MsgBox "", vbCritical, "Нет такого города в базе!"
Exit Sub
End Select
Form1.Print "Город - " & City$
Form1.Print "Площадь = " & Area & " тыс. кв. км."
Form1.Print "Население = " & Population & " тыс. чел."
 
End Sub


Модератор: Учимся использовать тэги оформления кода - FAQ
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.01.2014, 17:44
    #38516834
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
ИгорьCCCДумаете, будет работать?А чего тут думать, если можно попробовать. Работает
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.01.2014, 16:34
    #38518529
2114
2114
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
ИгорьCCC,

а
почему
....As Single - то ??
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.01.2014, 20:00
    #38519162
Volodbka
Volodbka
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите с задачей
2114, это чтобы точу с запятой не путать
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Помогите с задачей / 14 сообщений из 14, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 168ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2156589]:
 0ms
get settings:
 10ms
get forum list:
 13ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 50ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 55ms
get tp. blocked users:
 2ms
others: 15ms
total:  168ms
x
x
Закрыть


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