program ed;
uses crt;
var a:array[1..100] of integer;
b,i,n:integer;
Begin
n:=40; b:=3; a[1]:=12;
for i:=1 to n do
begin
a[i]:=a[1]+b*(i-1);
end;
writeln(a[30]);
readln;
End.