Составьте программу pascal определяющую количество цифр во введённой строке s

Question

Информатика: Составьте программу pascal определяющую количество цифр во введённой строке s

Викуля693 · Answer

Program gt;l,k,i:integer;s:string;beginreadln(s);l:=length(s);k:=0;for i:=1 to l doif((ord(s[i]) 47)and(ord(s[i]) 58))then k:=k+1;writeln(k);end....