составьте программу нахождения...

Тема в разделе "Информатика", создана пользователем 29td, 27 фев 2010.

  1. 29td

    29td New Member

    составьте программу нахождения количество слов в предложении. Предложение состоит из слов, отделёный друг от друга одним пробелом, вводится склавиатуры
     
  2. Tux_Nukem

    Tux_Nukem New Member

    Uses crt;
    var s:string;
    i,k:integer;
    begin
    readln(s);
    s:=s+' ';
    for i:=1 to length(s) do
    if s=' ' then inc(k);
    writeln(k);
    end.




     

Поделиться этой страницей

Наша группа