1) var x, y: integer;
begin
readln (x);
y:=Sqr(x);
writeln(y);
end.
2)var x: integer;
y:Real;
begin
readln (x);
y:=Sqrt(x);
writeln(y);
end.
3)var x: integer;
y:real;
begin
readln (x);
y:=exp(x);
writeln(y);
end.
4)var x: integer;
y:real;
begin
readln (x);
y:=sqrt(sqr(x));
writeln(y);
end.
