Аватар
Информатика, опубликовано 2018-08-22 18:46:53 by Гость

РЕШИТЕ В ПАСКАЛЕ: "Циклический алгоритм " В данной строке определить количество цифр.

Аватар
Ответ оставил Гость

Var
 str:string;
 count,i:integer;

begin
 count:=0;
 readln(str);
 for i:=1 to Length(str) do
  if (str[i]>0) AND (str[i]   count:=count+1;
 writeln(count);
end.

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.