Дана строка содержащая слова отделенные пробелом. определить сколько слов в строке начинается на "а". написать на паскале. , !

mukidinova mukidinova    3   22.10.2019 19:19    1

Ответы
Yulduzka28 Yulduzka28  11.08.2020 16:56

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика