Всі умови | Умова: Дано дійсне число a. Функція f(x), графіки якої представлений на мал. 1, a - 1, г, обчислити f(a).
(С.А. Абрамов, Г.Г. Гнездилова,Е.Н. Капустина, М.И. Селюн. Задачи по программированию. - Вологда, 2000. - №58)
program p58_2;
var
a, f : real;
begin
write('a = '); readln(a);
if (a < -1) then
f := 1 / sqr(a)
else if (a >= -1) and (a <= 2) then
f := sqr(a)
else
f := 4;
writeln('f = ', f:5:2);
readln;
end.