Регистрация
DakotaDp
04.01.2020 09:44
Информатика
Есть ответ 👍

Складіть Блок схему для наведеного фрагменту проекту

276
284
Посмотреть ответы 1

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

asli121
asli121
4,6(77 оценок)
Если слова в предложении разделяются одним пробелом, то: var s: string; p,k: integer; begin writeln('введите предложение: '); readln(s); s: =s+' '; k: =0; p: =pos(' ',s); while p< > 0 do   begin   k: =k+1;   delete(s,1,p);   p: =pos(' ',s);   end; writeln('k = ',k); end. пример: введите предложение: определить, сколько слов в данном предложении. k = 6

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