Tipul de date strucurate (string)

STRING reprezinta un tip de variabila care reprezinta o succesiune de maxim 255 caractere. (Litere de la A la Z; cifre; simboluri si spatii)

Problema:
 De la tastatură se cteşte un şir de caractere. De calculat suma cifrelor zecimale din acest şir.

Uses CRT;
Var X:String; I:Byte; :0..9; S,Cod:integer;
Begin
     ClrScr; Write (' introdu şirul:' ); Readln (X);
S:=0;
For I:=1 To length (X) Do begin;
Val ( X[I],C,Cod);
if Cod:=0 Then S:=S+C end;
Write ('suma cifrelor=',S);
Readkey 
 end.