a:=1; b:=40; c:=36; for i:=1 to 5 do begin a:=a*27+7; b:=b*9+4; if i>1 then c:=c*27; c:=c+6; end; a:=a+b+c+1; writeln(a);
i:=0; while a mod 3=0 do begin a:=a div 3; i:=i+1 end; writeln(a,' ',i);
Zistite, aké dve hodnoty sa vypíšu teraz. (Operácia mod znamená zvyšok po celočíselnom delení a div znamená celočíselné delenie.)
Poznámka: Pomôže Vám, keď budete všetky výpočty robiť v 3-ovej sústave.