задача по паскалю, вопрос?

Question

я ничего не понимаю, тему сам не разберу, болел, помогите пожалуйста решить, я отблагодарю как смогу... спасибо люди

Света Силантьева · Accepted Answer

Да, часто ты болеешь. Половину математики в школе пропустил 
a := Round(ln(k) + 0.5); 
b := Round(Exp(k) + 0.5); 
CountInt := Abs(b - a); 
 
Если готовая прога нужна пиши на почту

Мария Блинкова · Answer

var 
 N, k:Real; 
... 
... 
... 
readln(k); 
N:=floor(exp(k)) - ceil(ln(k)); 
writeln(N); 
 
p.s. может понадобиться подключение модуля math. 
floor можно заменить на round(exp(k) - 0.5), ceil - на round(ln(k) + 0.5)