Tengo que completar un algoritmo que cuente los enteros positivos inferiores a 1000 que cumplan que sean multiplos de 3.Es en pseudocodigo. el 'contador' contiene el numero de enteros positivos inferiores a 1000

Lo que me falta por completar son las lineas que hay, haber si alguien me podria echar una mano

algoritmo digitos

var
n,contador : entero;
centenas,decenas,unidades:entero;
digitos:booleano

{Pre:cierto}

contador:= __________;
n:=1;

mientras ___________ hacer

    si n<100 entonces
               digitos:= (n mod 3 = 0);

   sino
     si n<100 entonces
               digitos :=((n div 10) + (n mod 10 )) mod 3 =0 ;
   sino

____________________________________

___________________________________



fsi

fsi

si digitos entonces


_________________________________ 

fsi
n:=n+1;

fmientras