С клавиатуры вводят слово и символ составить программу которая

Содержание

С клавиатуры вводят слово и символ.составить программу,которая: а)проверяет есть ли в этом слове заданный символ б)определяет позицию заданного символа в)подсчитывает количество вхождений заданного символа.

Ответы

Ответ дал: pethovskiy

var s : string; symb : char; i : longint;
begin
readln(s);
readln(symb);
if pos(symb,s)=0 then writeln(‘В этом слове нет этого символа’)
else begin
i:=0;
while pos(symb,s)<>0 do begin
write(pos(symb,s)+i,’ ‘);
i:=i+1;
Delete(s,pos(symb,s),1);
end;
end;
writeln;
writeln(i);
end.

Источник: 5pages.net

С клавиатуры вводят слово и символ составьте программу которая проверяет есть ли в этом слове

С клавиатуры вводят слово и символ. Составьте программу, которая: а) проверяет, есть ли в этом слове данный символ; б) определяет позицию заданного символа; в) подсчитывает колличество вхождений заданного символа.

Java для начинающих. Урок 7: Ввод данных. Класс Scanner.

Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?

Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок — бесплатно!

23.12.2017 22:02
Информатика
remove_red_eye 2737
thumb_up 37

Ответы и объяснения 1

var
slovo,simval:string;
i,k:integer;
begin
k:=0;
write(‘vvedite slovo ‘);
readln(slovo);
write(‘vvedite simval ‘);
readln(simval);
for i:=1 to length(slovo) do
begin
if slovo[i]=simval then k:=k+1;
if slovo[i]=simval then writeln(i,’ ‘);
end;
if k>=1 then
writeln(‘YES vstre4aets9 ‘,k,’ raz, na pozicii ‘,i)else writeln(‘NO’);
writeln;
end.

вот в одном решении

Знаете ответ? Поделитесь им!

Как написать хороший ответ?

Чтобы добавить хороший ответ необходимо:

Отвечать достоверно на те вопросы, на которые знаете правильный ответ;
Писать подробно, чтобы ответ был исчерпывающий и не побуждал на дополнительные вопросы к нему;
Писать без грамматических, орфографических и пунктуационных ошибок.

Этого делать не стоит:

Копировать ответы со сторонних ресурсов. Хорошо ценятся уникальные и личные объяснения;
Отвечать не по сути: «Подумай сам(а)», «Легкотня», «Не знаю» и так далее;
Использовать мат — это неуважительно по отношению к пользователям;
Писать в ВЕРХНЕМ РЕГИСТРЕ.

Есть сомнения?

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

Трудности с домашними заданиями? Не стесняйтесь попросить о помощи — смело задавайте вопросы!

Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.

Программирование на Си — Урок 9 — символы, строки, библиотеки и печать на русском

Проверить наличие в слове заданного символа
Помогите пожалуйста с задачей: С клавиатуры вводят слово и символ. Написать программу, которая.

Проверить наличие в Edit определенного символа
Добрый день. У меня вопрос, есть ли возможность сделать условия таким образом, если в тексте.

Вопрос вызвавший трудности

Для того чтобы дать полноценный ответ, был привлечен специалист, который хорошо разбирается требуемой тематике «Разное». Ваш вопрос звучал следующим образом:

После проведенного совещания с другими специалистами нашего сервиса, мы склонны полагать, что правильный ответ на заданный вами вопрос будет звучать следующим образом:

var
slovo,simval:string;
i,k:integer;
begin
k:=0;
write(vvedite slovo);
readln(slovo);
write(vvedite simval);
readln(simval);
for i:=1 to length(slovo) do
begin
if slovo[i]=simval then k:=k+1;
if slovo[i]=simval then writeln(i,);
end;
if k>=1 then
writeln(YES vstre4aets9,k, raz, na pozicii,i)else writeln(NO);
writeln;
end.

вот в одном решении

НЕСКОЛЬКО СЛОВ ОБ АВТОРЕ ЭТОГО ОТВЕТА:

Работы, которые я готовлю для студентов, преподаватели всегда оценивают на отлично. Я занимаюсь написанием студенческих работ уже более 4-х лет. За это время, мне еще ни разу не возвращали выполненную работу на доработку! Если вы желаете заказать у меня помощь оставьте заявку на этом сайте. Ознакомиться с отзывами моих клиентов можно на этой странице.

Филатова Рая Иринеевна — автор студенческих работ, заработанная сумма за прошлый месяц 77 800 рублей. Её работа началась с того, что она просто откликнулась на эту вакансию