// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var s:=ReadlnString('Вводите:');
Write('Кол-во слов: ',s.ToWords.Count)
end.
<u><em>Тестовое решение</em></u>
Вводите: А роза упала на лапу Азора
Кол-во слов: 6
Mod - это остаток от деления.
33 / 12 - нацело не делится, нацело делится число 24, а что осталось - это остаток.
33-24 = 9, ответ 9.
//Если нужно будет перевести другую строку в цифры, то не забудь поменять параметр Size. В него нужно будет записать количество символов в строке
Program Test;
const Size = 19;
Var i, tmp: integer; Str, Resultat: string;
Begin
Str := 'yoonmin_in_my_heart';
for i := 1 to Size do
begin
tmp := ord(Str[i]);
Resultat := Resultat + tmp
end;
Writeln(Resultat);
End.
Ценность информации<span> — одно из важных свойств </span>информации<span>, оценка которого зависит от целей процессов её генерации и обработки. Изучается специальными теориями информации, </span>теорией принятия решений<span>.</span>