/  
 ДОКУМЕНТІВ 
20298
    КАТЕГОРІЙ 
30
Про проект  Рекламодавцям  Зворотній зв`язок  Контакт 

Програмування рядкових величин, Детальна інформація

Тема: Програмування рядкових величин
Тип документу: Реферат
Предмет: Комп`ютерні науки
Автор: Олексій
Розмір: 0
Скачувань: 944
Скачати "Реферат на тему Програмування рядкових величин"
Сторінки 1   2   3   4   5  
  s1:=copy(s,1,n-1);

  writeln(s1);

  delete(s,1,n);

  n:=pos(‘ ‘,s)

  end;

  writeln(s) 

end; 

procedure max_word(s:string; var s1:string); 

{ процедура знаходження найбільшого слова тексту } 

var m,n,max:integer;

  s2:string; 

begin

  s1:=”;

  max:=0;

  n:=pos(‘ ‘,s);

  while n<>0 do

  begin

  s2:=copy(s,1,n-1);

  m:=length(s2);

  if m>max then

  begin

  max:=m;

  s1:=s2

  end;

  delete(s,1,n);

  n:=pos(‘ ‘,s)

  end;

  m:=length(s);

  if m>max then s1:=s 

end; 

Сторінки 1   2   3   4   5  
Коментарі до даного документу
Додати коментар