ОЧЕНЬ СРОЧНО!!!! ПОЖАЛУЙСТА РЕШИТЕ ЗАДАЧУ!!! ЗАРАНЕЕ СПАСИБО!!!! используя строковый и символьный типы данных, составьте програм
ОЧЕНЬ СРОЧНО!!!! ПОЖАЛУЙСТА РЕШИТЕ ЗАДАЧУ!!! ЗАРАНЕЕ СПАСИБО!!!!
используя строковый и символьный типы данных, составьте программу для решения задачи: Дано предложение. Найдите кол-во слов в предложении (слова разделены пробелом)
PascalABC.NET Программа сработает некорректно если слова будут разделены несколькими пробелами или строка будет заканчиваться пробелом const c = ' '; var s : string; k,p : integer; begin writeln ('Введите строку'); readln (s); k := -1; p := 1; if (s <> '') and (s <> ' ') then begin while p <> 0 do begin k := k +1; p := PosEx (c,s,p+1); end; writeln (k+1,' word') end else writeln ('error string');<span> end.</span>