uses crt;
var n,i,d:integer;
begin
clrscr;
write('n='); readln(n);
d:=2*n;
for i:=1 to 10 do
writeln(d*i,' ');
readln;
end.
uses crt;
var n,x,i:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
x:= 2 * n;
for i:= 1 to 10 do
writeln(x,' x ',i,' = ',x * i);
readln
end.