Регистрация
Sadovnik11
26.04.2023 12:46
Информатика
Есть ответ 👍

Составить алгоритм , посчитать количество слов во веденной строке (паскаль ) ​

189
404
Посмотреть ответы 2

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

bestgad
bestgad
4,5(44 оценок)

ответ:

var

        str: string;

        i, count: integer;

begin

        write('your string: ');

        readln(str);

        i : = length(str);

        if i > 0 then begin

                count : = 1;

                while i > 0 do begin

                        if str[i] = ' ' then

                                count : = count + 1;

                        i : = i - 1;

                end;

        end

        else

                count : = 0;

        writeln('number of words: ', count);

readln;

end.

объяснение:

лена062
лена062
4,6(54 оценок)

щя я просто первым быть хочу

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