Процедуры и функции (решебник)

Решение типовых задач по теме «процедуры и функции». Решение производилось с использованием Free Pascal, в качестве IDE использовался Geany. Задачи из сборника Абрамова отмечены соответствующим номером.

424 Даны действительные числа s, t. Получить
f\left ( t, -2s, 1.17 \right )+f\left ( 2.2, t, s-t \right ),
где
f\left ( a, b, c \right )=\frac{2a-b-sin\left ( c \right )}{5+\left | c \right |}.

425 Даны действительные числа s, t. Получить
g\left ( 1.2, s \right )+g\left ( t, s \right )-g\left ( 2s-1, st \right ),
где
g\left ( a, b \right )=\frac{a^{2}+b^{2}}{a^{2}+2ab+3b^{b}+4}.

426 Дано действительное число y. Получить
\frac{1.7t(0.25)+2t(1+y)}{6-t(y^{2}-1)},
где
t(x)=\frac{\sum_{k=0}^{10}\frac{x^{2k+1}}{(2k+1)!}}{\sum_{k=0}^{10}\frac{x^{2k}}{(2k)!}}

427 Даны действительные числа a, b, c. Получить
\frac{max(a,a+b)+max(a,b+c)}{1+max(a+bc,1.15)}

430 Даны натуральные числа k,l,m, действительные числа x1,…,xk, y1,…,yl, z1,…,zm. Получить
t=\begin{cases}(max(y_{1}, ..., y_{l})+max(z_{1}, ..., z_{m}))/2 & \mbox{if } max(x_{1}, ..., x_{k})\geqslant 0,\\ 1+max(x_{1}, ..., x_{k})^{2} & \mbox{otherwise.} \end{cases}

431 Даны действительные числа s, t. Получить
h(s,t)+max(h^{2}(s-t,st), h^{4}(s-t,s+t))+h(1,1),
где
h(a,b)=\frac{a}{1+b^{2}}+\frac{b}{1+a^{2}}-(a-b)^{3}


Оставить комментарий