Question

elaborati in pasacal un program care citeste de la tastatura o secventa de caractere si afiseaza pe ecran numarul cifrelor zecimale citite

Answer 1

Răspuns:

program Secv_car;

var s:string;

   i, nc:integer;

   C: set of char;

begin

 read(s);

 C:=['0'..'9']; nc:=0;

 for i:=1 to  

 length(s) do

   begin

     if s[i] in C then inc(nc);

   end;

 writeln(nc);

end.

Explicație:

Dacă programul necesită afișare niște comentarii explicative, sper să le poți face... Important să înțelegi logica codului..

Succese!