Помогите решить задачу в PascalЗадано слово произвольной длины. Определить, сколько…

Question

38

Помогите решить задачу в PascalЗадано слово произвольной длины. Определить, сколько раз в нем встречается буква «и»

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

presto · Accepted Answer

94

presto

01 апреля 2023

var s: string; x, i: integer; begin write ('Введите строку: '); read (s); for i: =1 to length (s) do if s[i]='и' then inc (x); writeln ('Кол-во букв «и": ', x); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: