Предмет: Информатика,
автор: Vika111222
Даны натуральное число n, символы s1,...sn. , группы символов, разделённые пробелами (одним или несколькими) и не содержащие пробелов внутри себя , будем называть словами. подсчитать количество букв a в последнем слове данной последовательности
В TPascal
Ответы
Автор ответа:
0
var
s:string;
i,count,count1,numI:integer;
begin
count:=0;
count1:=0;
readln (s);
for i:=1 to length(s) do
if (s[i]=' ') then
begin
count:=count+1;
numI:=i;
end;
for i:=numI+1 to length(s) do count1:=count1+1;
writeln ('Число букв в последнем слове:',count1);
end.
Интересные вопросы
Предмет: Английский язык,
автор: ejgbhebgheb
Предмет: Математика,
автор: Аноним
Предмет: История,
автор: iskakovsuenys
Предмет: Физика,
автор: goshabass
Предмет: Математика,
автор: transhormers