Вопрос по информатике:
Срочно надо. Ввести символьную строку, определить ее длину, выяснить сколько букв 'e' в нее входит.
Пример:
Введите строку:
длинношеее
Результат:
Длина строки=10
3 букв 'e'
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 03.04.2017 19:07
- Информатика
- remove_red_eye 8510
- thumb_up 50
Ответы и объяснения 2
Program strs;
Var s:string;
i, e:integer;
begin
read(s);
for i:=1 to s.Length do
if s[i] = 'е' then
Inc(e);
writeln(s.Length);
writeln(e);
end.
- 04.04.2017 18:36
- thumb_up 19
var s:string; dl, k:integer;
begin
write('Введите строку: ');
dl:=length(s);
k:=0;
for i:=1 to dl do
if s[i]='а' then k:=k+1;
writeln('Длина строки - '',dl, ', в ней ',k,' букв е ')
end.
- 05.04.2017 08:13
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.