//ToWords разделяет строку с помощью разделителя (пробел по
//умолчанию) и возвращает массив строк.
var
b: string;
strings: array of string;
begin
readln(b);
strings := b.ToWords(' ');
for var i := 0 to length(strings) - 1 do
writeln(strings[i]);
end.
//Пример:
//Ввод:
q wer ty
//Вывод:
q
wer
ty
/*В комментария вы сказали, что нужно считать не все символы строки (не считать пробел), что я и отразил в коде. Если понадобится считать все символы строки, то можно обойтись без цикла, а сделать так: cout << "Symbols: " << fio.length();).*/
#include <iostream>
using namespace std;
int main()
{
string fio;
int counter = 0;
cout << "Enter FIO: ";
getline(cin, fio);
for (int i = 0; i < fio.length(); i++)
{
if (fio[i] != ' ')
counter++;
}
cout << "Symbols: " << counter;
return 0;
}
Кернинг и тренинг. не переживай ответ правильный!