Тема: Задачка!!!
Показать сообщение отдельно
Старый 15.11.2006, 01:16   #11
HolyDel
 
Регистрация: 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)
 
Ответить с цитированием