с клавиатуры вводится строка из нескольких символов разделенных ...
с клавиатуры вводится строка из нескольких символов разделенных одним или несколькими пробелами.определите количество слов в строке
Есть ответ
17.12.2022
173
Ответ
var
s : string;
flag : boolean;
i, c : integer;
begin
readln (s);
c := 0; flag := false;
for i := 1 to length (s) do
begin
if flag then
begin
if s[i] = ' ' then flag := false;
end
else
if s[i] ' ' then
begin
inc (c);
flag := true;
end;
begin
end;
end;
writeln (c);
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022
