1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        bin := 0;
        
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo : string;
i, bin : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
 ...

1
2
3
4
5
6
7
8
9
uses math;
 
var cislo, bin : string;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
 ...

1
2
3
4
5
6
7
8
9
var cislo : string;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
        begin
                write(cislo[i]);
 ...

1
2
3
4
5
6
7
8
9
var cislo : string;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
        begin
                write(cislo[i]);
 ...

1
2
3
4
5
6
7
8
9
var cislo : longint;
i : integer;
 
begin
        readln(cislo);
        cislo := (string)cislo;
        
        for i := 0 to 5 do
        begin
 ...

1
2
3
4
5
6
7
8
9
var cislo : longint;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
        begin
                write(cislo[i]);
 ...

1
2
3
4
5
6
7
8
9
var cislo : longint;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
        begin
        
 ...

1
2
3
4
5
6
7
8
9
var cislo : longint;
i : integer;
 
begin
        readln(cislo);
        
        for i := 0 to 5 do
        begin
        
 ...

1
2
3
4
5
6
7
8
9
var cislo : longint;
i : integer;
 
begin
        readln(cislo);
        
        for (i = 0; i < len(cislo); inc(i))
        begin
        
 ...

1
2
3
4
5
6
var cislo : longint;
 
begin
        readln(cislo);
        writeln(cislo);
end.

1
2
3
4
5
6
var cislo : longint;
 
begin
        readln(cislo);
        writeln(cislo);
end.

1
2
3
4
5
6
var cislo : long;
 
begin
        readln(cislo);
        writeln(cislo);
end.