Помогите, плиз )) другу надо, а я последний раз в школе Паскалем баловался )))

Рассчитать значение функции 1-x+sin(x)-ln(1+x)

заранее псб )

пасиб ) позвольте еще пару вопросиков уточняющих от сдающего ))
1) в коротком варианте точно можно без "program **" обойтись? )
2) по длинному ) за что отвечают function и readkey? )



считать с клавы можно как wrineln ('vvedite znachenie x') или как? (IMG:style_emoticons/default/smile.gif)