Тема: Помогите решить олимпиадную задачу! (Подробности в теме)
Показать сообщение отдельно
  #5  
Старый 10.11.2014, 16:53
Аватар для Alegun
Alegun Alegun вне форума
LMD-DML
  
Регистрация: 12.07.2009
Адрес: Богородское
Сообщения: 3,025
Версия Delphi: D7E
Репутация: 1834
По умолчанию
Так покрасивше будет
Код:
...
if odd(n) then o:= (n+1)/2 else o:= n/2;
...
Ответить с цитированием