• Написать
    программу pascal и excel, которая находит длину самого длинного слова в строке.

Ответы 2

  • Pascal:var s,s1,s2,max:string;i,k,maxdl,j:integer;beginreadln(s);s1:=concat(s,' ');s2:=s;maxdl:=0;while pos(' ',s1)>0 do beginmax:=copy(s1,1,pos(' ',s1)-1);delete(s1,1,pos(' ',s1)); if maxdl<pos(' ',s1)-1 then maxdl:=length(max);end;if length(max)>maxdl then maxdl:=length(max);writeln(maxdl);end.P.s. немножко криво написано)) но работает.
  • Вариант с VBA ExcelЧтобы увидеть программу жмите Alt+F11
    • Автор:

      mileynjew
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years