Показать сообщение отдельно
  #3  
Старый 10.11.2014, 16:47
polik702 polik702 вне форума
Прохожий
 
Регистрация: 13.06.2012
Сообщения: 14
Репутация: 10
По умолчанию Ответ!

решил сегодня:
n:=53;
if odd(n)=false then o:=n/2;
if odd(n)=true then o:=(n+1)/2;
write(o);
Ответить с цитированием