program C;
var i,j,n:real;
begin
writeln ('Vvedit chislo');
readln (n);
i<=n;
j<=n;