Дана строка содержащая слова отделенные пробелом. определить сколько слов в строке начинается на "а". написать на паскале. , !
288
371
Ответы на вопрос:
var s: string;
i,k: integer;
begin
readln(s);
k: =0;
if s[1]< > ' ' then insert(' ',s,1);
for i: =1 to length(s)-1 do
if (s[i]=' ') and (s[i+1]='a') then
k: =k+1;
write('k=',k);
end.
Популярно: Информатика
-
BlackJuice06.06.2020 22:42
-
RitkaRita14.02.2020 06:14
-
soldiertoy0124.05.2022 13:44
-
андаин199808.06.2022 07:01
-
oxle23.10.2021 21:50
-
aishaolzhas31.01.2022 20:28
-
Ilvina124krs21.12.2022 13:08
-
fhtyf23.06.2020 03:37
-
Даун76625.09.2021 18:44
-
mrzaizat05.03.2022 22:54