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

Question

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

Answer 1

37

alando

26 августа 2022

varslovo,simval: string; i,k: integer; begink: =0; write ('vvedite slovo '); readln (slovo); write ('vvedite simval '); readln (simval); for i: =1 to length (slovo) dobeginif slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln (i,'); end; if k>=1 thenwriteln ('YES vstre4aets9 ',k,' raz, na pozicii ',i) else writeln ('NO'); writeln; end. Вот в одном решении

пользователи выбрали этот ответ лучшим

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

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

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

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