Дана строка символов.найти количество слов,у которых первый последний символы между собой
158
244
Ответы на вопрос:
uses crt; var s,sl: string; i,k: integer; beginwriteln('введите строку'); readln(s); s: =s+' '; sl: =''; for i: =1 to length(s) do if s[i]< > ' ' then sl: =sl+s[i] else begin if (sl[1]=sl[length(sl)]) and (length(sl)< > 0) then inc(k); sl: =''; end; writeln('количество слов, начинающихся и заканчивающихся одной буквой = ',k); readkeyend.
From random import randintn = int(m = 0z=0for i in range (n): b = 10**i * randint(0,9) m = m + b if (b/10**i) % 2 == 0: z = z+1print(m)print(z)
Популярно: Информатика
-
VarvaraErrorFell11.07.2022 10:31
-
alliekw3p0144w20.04.2021 16:50
-
UnknownKnowns10.10.2022 02:09
-
sof200805.10.2021 11:01
-
M4xL1ght11.10.2020 03:54
-
marina1976124.01.2022 09:15
-
Mashannjjj15.10.2022 05:04
-
nargizcavid02.10.2022 04:04
-
malinkarinka59912.07.2021 20:17
-
hoper12326.03.2023 17:18