MS Access má intuitívne grafické rozhranie. S tým nemôžeš mať problém. Napíš čo konkrétne potrebuješ vyriešiť. Takto Ti nikto nepomôže.

mam ten isty problem... prosim vas ak to niekto viete pomozte mi ...na mna je to privela :-(


program pascal;

type zaznam=record
pocet: integer;
pouzita: boolean;
end;

var
cislo, orig, cif_sucet, i, l, pocetcif, j: integer;
pole: array[0..9] of zaznam;

begin
cif_sucet:=0;
pocetcif:=0;

for j:=1 to 9 do begin
pole[j].pouzita:=false;
pole[j].pocet:=0;
end;

write('Zadaj cislo: ');
readln(cislo);
orig:=cislo;

while (cislo<>0) do begin
i:=cislo mod 10;
pole[i].pocet:=pole[i].pocet+1;
pole[i].pouzita:=true;
cif_sucet:=cif_sucet+i;
cislo:=cislo div 10;
pocetcif:=pocetcif+1;
end;
writeln('Cislo ', orig,' ma ', pocetcif, ' cifier, jeho ciferny sucet je ', cif_sucet);
writeln('Usporiadane cislice: ');

for j:=0 to 9 do
if (pole[j].pouzita=true) then
for i:=1 to pole[j].pocet do
writeln(j);

readln;
end.