var i,s: integer;
begin
s:=0;
For i:=1 to 6 do
s:=s+3*i; {3*1+3*2+3*3+3*4+3*5+3*6}
Write(s); {63}
end.
var i,s: integer;
begin
s:=0;
For i:=1 to 6 do
s:=s+3*i; {3*1+3*2+3*3+3*4+3*5+3*6}
Write(s); {63}
end.