Написать в паскаль. Вводится предложение. Определить длину самого длинного слова.
10-11 класс
|
Danil2465
17 авг. 2016 г., 11:07:31 (7 лет назад)
Kotenki
17 авг. 2016 г., 11:45:49 (7 лет назад)
var s:string;
m,tmp,i:integer;
begin
readln(s);
for i:=1 to length(s) do begin
if (s[i]<>' ') then inc(tmp)
else begin
if tmp>m then m:=tmp;
tmp:=0;
end;
end;
if tmp>m then m:=tmp;
writeln(m);
end.
Ответить
Другие вопросы из категории
Имеется
некоторая последовательность символов. Образовать новую последовательность,
включив в нее символы исходной, кроме запятых. (использовать склейку «+»)(не использовать pos, delete,
copy…)
Читайте также
Написать
программу pascal и excel, которая находит длину самого длинного слова в строке.
Написать в Паскаль программу для решения следующей задачи.
Вводится строка, состоящая только из цифр без нуля. Написать пользовательскую функцию, которая возвращает строку , добавляя после каждого символа символ '0'.
Вы находитесь на странице вопроса "Написать в паскаль. Вводится предложение. Определить длину самого длинного слова.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.