program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

program tablica;

var abela:array [1..10] of integer;

i:integer;

begin

for i:=1 to 10 do

tabela[i]:=i;

for i:=1 to 10 do

writeln (tabela[i]);

readln;

end.

---