Дано предложение. в нем слова разделены пробелом.верно ли ,что число слов в предложении больше трёх.напишите программу в паскале . заранее

dogs2247 dogs2247    2   26.08.2019 03:40    3

Ответы
Аким548 Аким548  05.10.2020 20:13

var

s:string;

i,count:integer;

begin

count:=0;

readln (s);

for i:=1 to length(s) do

if (s[i]=' ') then count:=count+1;

if (count+1 >=3) then

writeln ('Верно')

else

writeln ('Неверно');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика

Популярные вопросы