Problem:
Score : 100 points

Problem Statement

Given is an integer x that is greater than or equal to 0, and less than or equal to 1.
Output 1 if x is equal to 0, or 0 if x is equal to 1.

Constraints

0 \leq x \leq 1

x is an integer

Input

Input is given from Standard Input in the following format:

x

Output

Print 1 if x is equal to 0, or 0 if x is equal to 1.

Sample Input 1

1

Sample Output 1

0

Sample Input 2

0

Sample Output 2

1

Solution in Pascal (FPC 3.0.4) (judge verdict: Accepted)

var

k,x,i:integer;
s:string;
r:real;



begin

//program 1

readln(x);

IF (x = 0) THEN

begin
	writeln('1');
end;

IF (x = 1) THEN

begin
	writeln('0');
end;

end.