n:word
y:real;
n:=sel(y=0,(trunc(y)+n+1)/2,0); //как-то проще тоже можно, например у:=n+trunc(y-n), но это чуть другое хотя подходит
полтора землекопа - рулят
n:word
y:real;
n:=sel(y=0,(trunc(y)+n+1)/2,0); //как-то проще тоже можно, например у:=n+trunc(y-n), но это чуть другое хотя подходит
полтора землекопа - рулят
Последний раз редактировалось Валенок; 20.09.2013 в 13:50.
Ваши права
Ответить с цитированием