Найти количество цифр 9 в строке s.

Найти количество цифр 9 в строке s.

Задать свой вопрос
Елизавета Щебрикова
Что, прости? Где задание?
Людмила Клеина
Это и есть задание
1 ответ
//Pascal
//--------------------------------------------
var
S: string;
i, counts: byte;
begin
counts := 0;
write('Введите S: ');
readln(s);
for i := 1 to length(s) do
if S[i] = '9' then
  counts := counts + 1;
writeln('Количество "9" = ', counts);
readln;
end.
Turbeneva Julija
Спасибо огромное.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт