Склавиатуры одной строкой вводят имя и фамилию. составьте программу, которая определяет, есть ли во введенной строке заданный символ
267
362
Ответы на вопрос:
var slovo,simval: string; i,k: integer; begin k: =0; write('введите имя и фамилию '); readln(slovo); write('введите символ '); 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('да, встречается ',k,' раз, на позиции ',i)else writeln('нет'); end.
я немножко перевыполнил) от показывает есть симаол или нет, если есть то сколько раз он входит и на какой
Популярно: Информатика
-
myra504.05.2021 02:06
-
ranilgalimzyanov11.11.2021 00:35
-
tat211924.06.2022 20:37
-
xlebic200806.09.2021 10:50
-
НекоТянка6a22.08.2020 05:42
-
NeZoX1111111124.09.2021 05:51
-
romab0707.01.2023 14:07
-
милуя23.12.2021 06:05
-
alina193426.06.2022 10:38
-
gaifuling4owmrcy27.04.2020 02:45