Регистрация
mridrazov
27.02.2022 15:04
Информатика
Есть ответ 👍

Ввести с клавиатуры символьную строку и определить сколько в ней слов. пример: вася пошел найдено 3 слова.

133
477
Посмотреть ответы 3

Ответы на вопрос:

НезнайкаЛёша
НезнайкаЛёша
4,4(26 оценок)
Если слова разделяются одним пробелом, то можно решить так: var s: string; k: integer; begin writeln('введите строку'); readln(s); s: =s+' '; k: =0; while pos(' ',s)> 0 do   begin   k: =k+1;   delete(s,1,pos(' ',s));   end; writeln('количество слов в строке = ',k); end. пример: введите строку вася пошел гулять. количество слов в строке = 3
даша7642269
даша7642269
4,5(99 оценок)
// pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin   var s: =readlnstring('> ');   print('найдено слов: ',s.towords.count) end. тестовое решение: > вася пошел гулять найдено слов: 3
volodya13031
volodya13031
4,4(22 оценок)
Var s: string; i: integer; begin readln(s); for i: =1 to length(s) do if s[i] in ['a'..'z'] then write(chr(ord(s[i])+ord('a')-ord('a'; end.

Популярно: Информатика