var
Q,l,R:real;
t:integer;
 begin
l:=10;
R:=100;
for t:=1 to 10 do
writeln ('Q=',l*l*R*t);
end.