Дана последовательность прлизвольных символов, подсчитать количество цифр в этой последовательности.
3 комментария:
дана последовательность - как, с клавиатуры ввести, или константой в программе. какой язык программирования???
Паскаль abc
С клавиатуры ввести
дана последовательность - как, с клавиатуры ввести, или константой в программе. какой язык программирования???
Паскаль abc
С клавиатуры ввести Ответы
Гость Var
S: string;
CountNumbers, i: byte;
begin
write('Введите строку: '); readln(S);
for i := 1 to Length(S) do
if S[i] in ['0'..'9'] then CountNumbers := CountNumbers + 1;
writeln('Количество цифр в строке = ', CountNumbers);
end.
Нет комментариев
Похожие вопросы
Информатика
Помогите пожалуйста с информатикой!...
Информатика
Помогите пожалуйста срочно10 баллов...
Список предметов
