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)
|
|