var
pr : longint;
i : integer;
begin
pr := 1;
for i := 10 to 99 do
if (i mod 3 = 0) then
pr := pr * i;
writeln(pr);
end.
var
pr : longint;
i : integer;
begin
pr := 1;
for i := 10 to 99 do
if (i mod 3 = 0) then
pr := pr * i;
writeln(pr);
end.