Ответы
Ответ дал:
0
var x,y: integer;
begin
readln(x);
if x>1 then y:=x-1
else if x<-1 then y:=x+1
else y:=0;
write(y);
end.
Вас заинтересует
2 месяца назад
2 месяца назад
4 месяца назад
4 месяца назад
1 год назад
1 год назад
7 лет назад