Даны натуральное число n, символы . , группы символов, разделённые пробелами (одним или несколькими) и не содержащие пробелов внутри себя , будем называть словами. подсчитать количество букв a в последнем слове данной последовательности в tpascal
100
297
Ответы на вопрос:
vars: string; i,count,count1,numi: integer; begincount: =0; count1: =0; readln (s); for i: =1 to length(s) doif (s[i]=' ') thenbegincount: =count+1; numi: =i; end; for i: =numi+1 to length(s) do count1: =count1+1; writeln ('число букв в последнем слове: ',count1);
end.
Популярно: Информатика
-
анна1001026.01.2021 07:00
-
КУРОПАТКА77725.05.2023 03:10
-
Vernаrd12.12.2021 00:44
-
йцукен5608.10.2021 03:01
-
0динокийхомяк02.03.2023 14:56
-
saphiro1218.09.2021 16:46
-
Іруна14.05.2020 06:51
-
olgagolos06.12.2020 05:22
-
astanina04219.09.2022 04:42
-
Pasha232212.03.2021 20:42