=I-1; END;WRITELN('---'

1. - DE THI HOC SINH GIOI TIN CO DAP AN
DE THI HOC SINH GIOI TIN CO DAP AN

1.5

n:= n div 10;

i:=i-1;

end;

Writeln('---':13);

Writeln(l:12);

0.5

Readln;

End.