Помогите с информатикой, пожалуйста
Ответ на задачу:
Сработает последние условие.
X = 6;
Y = 0;
А вторая, там что?
1 задача.
x = 6
y = 0
2 задача.
function func(x: Integer): Integer;
begin
if x
func := -x
else if (0 < x) and (x
func := x
else if (2 < x) and (x
func := 4 - x
else
func := x - 4;
end;
var
x, y: Integer;
readln(x);
y := func(x);
writeln(y);
end.
О, спасибо)
