|
2D-программирование Вопросы, касающиеся двумерного программирования |
11.11.2006, 04:53
|
#1
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Задачка!!!
Задали мне задачку, знаю токо Блитз3Д(плохо)!!!! Помогите плизз розвязать!!!
Было у парня "А" денег
Пошёл он попить соку по "В" денег(Стратил всё "А"денег!!!)
Здал пустые бутылки по "С" денег
И опять за соком!!!
Я помойму формулу сделал, но как привязать цикл???
Неоткажусь, если кто поможет с формулой???!!!
|
(Offline)
|
|
11.11.2006, 05:19
|
#2
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Re: Задачка!!!
Ксли я правельно понял то что ты просил, то вот, надеюсь прально =)
A#=Input("Input Cash:")
B#=Input("Input Beer Price:")
C#=Input("Input Bootle Price:")
Repeat
Botles#=Int(A/B)
SellBotles#=Botles*C
CashLeft#=(A-(Botles*B))+C
Print "CashLeft After First Cicle: "+CashLeft
WaitKey()
Until KeyHit(1)
End
|
(Offline)
|
|
11.11.2006, 05:55
|
#3
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Re: Задачка!!!
Спасибо! Но может я неправильно обяснил, мне нужно обчислить всьо так, чтоб при введении любих чисел(1,2,3,4...), вибивалось количество випитых им бутылок соку!!! Чтоб после окончания первого цикла сбивалась сума из сданых бутылок и здачи, какая отвечяла значением "А" в следующем цыкле! Ну теперь надеюсь понятно обьяснил!!! Если б всьо было так просто, то я и сам б сделал!!! ГГ!!!
|
(Offline)
|
|
11.11.2006, 06:07
|
#4
|
.
Регистрация: 05.08.2006
Сообщений: 10,429
Написано 3,454 полезных сообщений (для 6,863 пользователей)
|
Re: Задачка!!!
Мда, похоже я мало сплю, сорри что полез, но всё-равно не понимаю объяснения, но эт незначит что ты "не так" объяснил, эт просто я сёдня не в состоянии =) Сорри...
|
(Offline)
|
|
11.11.2006, 16:45
|
#5
|
☭
Регистрация: 26.09.2006
Сообщений: 6,035
Написано 1,474 полезных сообщений (для 2,707 пользователей)
|
Re: Задачка!!!
a#=Input("a:")
b#=Input("b:")
c#=Input("c:")
s%=0
While a>=b
g%=Floor(a/b):a=c*g:s=s+g
Wend
Print "Выпито:"+s
|
(Offline)
|
|
13.11.2006, 02:08
|
#6
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Re: Задачка!!!
Спасиб, но у меня примерно такойже код, токо функция Floor стоит после фрази "????????" !!! И чето невиходит, ти ето тестил??? Здачя в киоске важна!! Но с ней я справлюсь!!! Вот мой код, но он неисправен:
Graphics3D 640,480,32,1
Global Drink#= 0
Global J#= 0
fntCom1=LoadFont("Comic Sans MS",25,False,False,False)
SetFont fntCom1
Print "1grn. = 1,00"
fntCom=LoadFont("Comic Sans MS",20,False,False,False)
SetFont fntCom
A#=Input$("How mach moneys have a boy???")
B#=Input$("How much moneys need a boy to buy 1 juise???")
C#=Input$("How much price was empty buttle???")
If A# < B# Print "Hi cant to buy a juise!!!"
If C# >= B# Then Print "When hi drink oll his juise, hi will die!!!"
For r=0 To (J# <= (A# - B#))
D# = A# / B#
I# = A# - (D# * B#)
F# = D# * C#
A# = I# + F#
Drink# = Drink# + D#
Next
Print "Buttles wich he drink " + Floor(Drink#)
WaitKey
|
(Offline)
|
|
13.11.2006, 02:20
|
#7
|
☭
Регистрация: 26.09.2006
Сообщений: 6,035
Написано 1,474 полезных сообщений (для 2,707 пользователей)
|
Re: Задачка!!!
кол-во бутылок не может быть дробным.
код я тестил. он работал.
упс. похоже он работал не правильно. Остаток я не учитывал.
|
(Offline)
|
|
13.11.2006, 14:28
|
#8
|
Оператор ЭВМ
Регистрация: 11.10.2006
Сообщений: 35
Написано 0 полезных сообщений (для 0 пользователей)
|
Re: Задачка!!!
Сообщение от Halk-DS
A#=Input$("How mach moneys have a boy???")
B#=Input$("How much moneys need a boy to buy 1 juise???")
C#=Input$("How much price was empty buttle???")
If A# < B# Print "Hi cant to buy a juise!!!"
If C# >= B# Then Print "When hi drink oll his juise, hi will die!!!"
Print "Buttles wich he drink " + Floor(Drink#)
|
Украинцкий-англицкий!
Так что узнать надо?
|
(Offline)
|
|
14.11.2006, 16:31
|
#9
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Re: Задачка!!!
Сообщение от untonee
Украинцкий-англицкий!
|
Че ето вдруг??? Непонял?
Найти надо скоко бутылок(сока) он выпил пока у него не кончились деньги!!! Тоесть! я привиду пример с цыфрами!!!
Было у парня 20р. а пить хотел он, ужас!!!
Вот пошёл он в магазин за соком, сок стоит 3р.(дешевенький ГГГ!)!!!
Хватило у него на 6 бутылок (Запомните, здачя 2р.)!!!
Купил он их и выпил!!! (1.5л ГГ! )!!!
Пустые бутылки(6 шт.) здал по 0.75р. за каждую!!!
Получилось у него 4.5р.! Но у нас здачя с прошлого раза(2р.)!
Тоесть в общем у него осталось не 4.5р. а 6.5р.
Он опять пошёл в магазин и купил 2 бутилки сока!!!(Здачя 0.5р.)
Выпил, сдал, и получил 1.5р. плюс здачя 0.5р. В общем 2р.
2р. на сок не хватит!!!
Так теперь коече уточню!!!
То что у нас осталось в коце-неважно!
То, скоко он раз ходил за соком, тоже не важно(важно как указать ето в формуле )
Вожно то скоко он выпил бутылок сока!!! (в примере их 8 шт.)
Хууу!!! Ну теперь надеюсь понятно обьяснил ???
|
(Offline)
|
|
14.11.2006, 20:04
|
#10
|
|
Re: Задачка!!!
Halk-DS
по алгоритму все правильно
но вот уровень английского тебе надо бы повысить
к примеру вот так (тут возможно тоже есть ошибки )
A#=Input$("How much money have a boy?")
B#=Input$("How much cost juise?")
C#=Input$("How much cost empty bottle of juice?")
If A# < B# Print "He cant buy a juise!"
If C# >= B# Then Print "empty bottle of juice cost more then full bottle of juice... hmm ... "
|
|
|
|
15.11.2006, 01:16
|
#11
|
☭
Регистрация: 26.09.2006
Сообщений: 6,035
Написано 1,474 полезных сообщений (для 2,707 пользователей)
|
Re: Задачка!!!
a#=Input("a:")
b#=Input("b:")
c#=Input("c:")
s%=0
While a>=b
g%=Floor(a/b)
os#=a-(g*b)
a=c*g+os
s=s+g
Wend
Print "Выпито:"+s
|
(Offline)
|
|
15.11.2006, 08:57
|
#12
|
|
Re: Задачка!!!
HolyDel
ето типа кто меньше напишет слов чтоли ?
|
|
|
17.11.2006, 02:43
|
#13
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Re: Задачка!!!
2Джимон: Ето типа: "кто мне поможет сделать задачю?"
Спасибо всем, но мой уровень английского-проблема другая! Недавно дотугодумил как исправить баг, заключён в повторении цыкла! Тоесть я пробовал привязать както ето к функциям For .... To..... NEXT !!!!!!!
Благодаря сообщениям ХолиДела додумался использовать Repeat Until
Всем спасибо! Задачя розвязана!!! И хорошо работает!
|
(Offline)
|
|
30.11.2006, 14:21
|
#14
|
Разработчик
Регистрация: 09.08.2006
Адрес: Украина
Сообщений: 431
Написано 65 полезных сообщений (для 53 пользователей)
|
Re: Задачка!!!
! У меня ешо вопрос!!! Можна ли сделать систему кодировки?? Например! есть у нас число 9562814547697752438!!! И из него вытянуть все 4 и 7, чтоб у нас вышло число 447774!!! Или наведу пример проще! 121 -витянуть все 1 и 3 получяется 11 !!! Можна токое сделать?
|
(Offline)
|
|
30.11.2006, 15:30
|
#15
|
Дэвелопер
Регистрация: 07.09.2005
Сообщений: 1,519
Написано 66 полезных сообщений (для 164 пользователей)
|
Re: Задачка!!!
С увереностью заявляю: не только можно, но и очень просто.
И помогут тебе в этом цикл, оператор сравнения и операторы Str, Len и Mid.
|
(Offline)
|
|
Ваши права в разделе
|
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения
HTML код Выкл.
|
|
|
Похожие темы
|
Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
Задачка... |
Atomikc |
Visual Basic |
10 |
09.11.2009 19:45 |
Задача по ТВ |
impersonalis |
Математика |
7 |
30.12.2008 22:12 |
2 задачки |
mudriy |
Загадки |
14 |
26.11.2007 11:55 |
Задачка |
Magus |
Болтовня |
19 |
16.05.2007 20:43 |
Задача |
SubZer0 |
Загадки |
8 |
30.07.2006 16:33 |
Часовой пояс GMT +4, время: 17:14.
|