Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

ОЧЕНЬ СРОЧНО!!!! ПОЖАЛУЙСТА РЕШИТЕ ЗАДАЧУ!!! ЗАРАНЕЕ СПАСИБО!!!!

используя строковый и символьный типы данных, составьте программу для решения задачи:
Дано предложение. Найдите кол-во слов в предложении (слова разделены пробелом)

более месяца назад
Просмотров : 15    Ответов : 1   

Лучший ответ:

PascalABC.NET
Программа сработает некорректно если слова будут разделены                       несколькими      пробелами или строка будет заканчиваться пробелом
const      c = ' '; 
var   
s : string;   
k,p : integer;    
begin 
writeln ('Введите строку'); 
readln (s); 
k := -1; 
p := 1; 
if (s <> '') and (s <> ' ') then   
begin   
while p <> 0 do     
begin       
k := k 1;       
p := PosEx (c,s,p 1);      
end;   
writeln (k 1,' word')    
end   
else   
writeln ('error string'); 
end.

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт





Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы: