48

Дана строка заканчивающаяся точкой подсчитать сколько в строке слов с тремя…

06 апреля 2023

Дана строка заканчивающаяся точкой подсчитать сколько в строке слов с тремя буквамиPASCAL

категория: информатика

62

Var c: char; k,i: integer; begink: =0; i: =0; read (c); while c<>'.' do beginif c=' then beginif i=3 then k: =k+1; i: =0 endelse i: =i+1; read (c) end; write (k) end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...