program tretas;
Var b : real;
Var a : Integer;

Begin

a := 0;

End.