Вопрос Напишите пожаааалуйста программу программумв паскале абс

[андрей18]

4 задание плиииз
//otvet.imgsmail.ru/download/56918303_d8dab93149ff8a68652951e48d36a5f9.jpg

 

[Konstant1n72]

Обычный Паскаль до х=36 не берет, после х=15 пишет туфту. var x:integer; begin for x:=1 to 36 do writeln(round(((exp((2*x+1)*ln(2)))+1)/3)) end.

 

[димонлиперон]

//otvet.imgsmail.ru/download/35530148_fee5c2a0598d37cce5e8ebb9defc34f5_800.png