1program synerr2(input,outpu);
2integer a(10)
3begin
4	read(b);
5	for c := 1 to 10 do
6		a(c) := b * c;
7end.
8