Задание:
Составить программу на языке паскаль. Вычислить значение у. Если у=cистема: x²-3, x<3 |x|-5, x>3
Решение:
var x, y: real; begin write ('x='); readln (x); if x > 3 then y: =x*x — 3 else y: =abs (x) — 5; writeln ('y=', y); end. //второй вариант var x: real; begin write ('x='); readln (x); if x > 3 then writeln ('y=', x*x — 3) else if x < 3 then writeln ('y=', abs (x) — 5) else writeln ('значение функции не определено'); end.
Знаете другой ответ?