uses crt;
var i,s:integer;begins:=0;for i:=10 to 99 dobeginif ( i mod 3 = 0) thens:=s+i;end;writeln(s/89);end.
uses crt;
var i,s:integer;
begin
s:=0;
for i:=10 to 99 do
begin
if ( i mod 3 = 0) then
s:=s+i;
end;
writeln(s/89);
end.