Pascal ABC. Напишите листинг решения оператора ветвления.
Pascal ABC. Напишите листинг решения оператора ветвления.
Гость
Ответ(ы) на вопрос:
Гость Это задача на систему третьего порядка, в школьном курсе рассматриваются такие задачи. Предлагаю такое решение
var x,y:real;
begin
read (x);
If x>2.5 then y:=sin(2.3*x-1);
if x<0 then y:=sqr(x)/(2-x);
if ( x>=0) and (x<=2.5 ) then y:=1-3*ln(abs(1-x));
writeln(y);
end.
Не нашли ответ?
Похожие вопросы