Дана строка символов
Сколько раз среди данных символов встречаться цифра?
паскаль. подскажите

Var
  s:string;
  i,k:integer;
begin
  s:=5*sin(x-pi/4)+(x-2.6)/(sqr(x)+4*x-3); {чтобы не вводить}
  k:=0;
  for i:=1 to length(s) do
    if (s[i] in [0..9]) then k:=k+1;
  writeln(Количество цифр равно ,k)
end.

Количество цифр равно 6

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.