Реализовать функцию, с помощью ветвления g=[latex] \left \ { {{sin(2x) if x\ \textgreater \ 0} \atop 5 x^{2} else }} \right. [/latex]ЯЗЫК PASCAL ABC

Question

Реализовать функцию, с помощью ветвления g=[latex] \left \ { {{sin(2x) if x\ \textgreater \ 0} \atop 5 x^{2} else }} \right. [/latex]ЯЗЫК PASCAL ABC

Реализовать функцию, с помощью ветвления g=[latex] \left \ { {{sin(2*x) if x\ \textgreater \ 0} \atop 5* x^{2} else }} \right. [/latex] ЯЗЫК PASCAL ABC

Гость

Ответ(ы) на вопрос:

Accepted Answer

Если я правильно понял g = sin(2*x) для x>=0 иначе g = 5* x², тогда может получиться такой код: var x,g:real; begin writeln('Введите х');readln(x); if x>0 then g:=sin(2*x) else g:=5*sqr(x); writeln(g); end.

Реализовать функцию, с помощью ветвления g=[latex] \left \ { {{sin(2*x) if x\ \textgreater \ 0} \atop 5* x^{2} else }} \right. [/latex]ЯЗЫК PASCAL ABC

Реализовать функцию, с помощью ветвления g=[latex] \left \ { {{sin(2x) if x\ \textgreater \ 0} \atop 5 x^{2} else }} \right. [/latex]ЯЗЫК PASCAL ABC