var i, k: integer;
begin
k:=0;
for i:=1 to 7 do
begin write(i*10+(7-i),' '); k:=k+1; end;
writeln;
writeln('k = ',k);
end.
var i, k: integer;
begin
k:=0;
for i:=1 to 7 do
begin write(i*10+(7-i),' '); k:=k+1; end;
writeln;
writeln('k = ',k);
end.