Если файл содержит пустые строки, то программа завершается с ошибкой исправить Очень количество слов}
g: Text; {файловая переменная}
s: string;
error: longint;

function count_word_in_string(s1:string ):byte;
var k1,i: byte;{i-переменная цикла, ограниченная длиной строки}
begin
k1 := 0;
i := 0;
repeat {отделение пробелов в начале строки}
inc(i);
until (s1[i]<>' ') or (i>length(s1));
while i begin
repeat {отделение слова}
inc(i)
until (s1[i]=' ') or (i>length(s1));
inc(k1);
repeat {отделение пробелов}
inc(i)
until (s1[i]<>' ') or (i>length(s1));
end;
count_word_in_string:=k1;
end;

begin

Assign(g, cFileName);
{$I-} {Отключаем контроль ошибок ввода/вывода}
Reset(g); {открываем файл для чтения }
{$I+} { Включаем контроль ошибок ввода/вывода }
error := IOResult;
if error <> 0 then
begin
writeln('Error[', error, ']: file not open');
Halt(1);
end;

{цикл чтения файла}
Write('Soderzhimoye fayla: ');
k:=0;
while (error=0) and (not Eof(g)) do
begin
readln(g,s);
writeln(s);
k := k+count_word_in_string(s);
error := IOResult;
end;
if error <> 0 then
Writeln('Error [',error, ']: file write error');
Close(g);
write('Kolichestvo slov v dannom faile ravno ',k);
readln;

end.

Язык программирования Паскаль

ответ:

современное социально- и научно-технологическое развитие характеризуется процессами , интеграции государств, быстрым перемещением продукции, услуг, людей, капиталов и идей. происходит переход к шестому технологическому укладу. принимая во внимание, что технологический уклад представляет собой освоенные прорывные технологии, инновации, изобретения, определяющими факторами развития становятся научно-технический прогресс, когнитивная и креативная человеческая составляющая технологических процессов и интеллектуализация основных факторов производства. , основанная на знаниях, в которой знания обогащают все отрасли, все секторы и всех участников процессов. главный эффект , основанной на знаниях, заключается не столько в выпуске высокотехнологичной продукции, сколько в ее использовании во всех отраслях и сферах. главное в , основанной на знаниях, не столько создать новое знание, сколько продуктивно его использовать. стратегия инновационного развития страны опирается на реализацию человеческого потенциала, на более эффективное применение знаний и умений людей для постоянного улучшения технологий, результатов и жизни общества в целом. переход на инновационный путь развития связан прежде всего с инвестициями в человеческий капитал. объектами инновационного менеджмента являются инновации продукта, процесса и стратегии. развиваются приоритетные сегменты в поисках дополнительных источников повышения прибыльности компании: от финансами, отношениями с клиентами до качеством и знаниями. все чаще конкурентные преимущества компаний заключаются в творческом потенциале сотрудников. в статье рассмотрены актуальные аспекты развития , основанной на знаниях, организационно- инновации, связь генерации инноваций с эффективным знаниями организации, а также вопросы формирования инноваторов лидеров перемен в инновационной .

киберленинка:

Const
n=10; m=7;
var
j,i,i_max,s,max:integer;
a:array[1..n,1..m]of integer;
begin   
 for i:=1 to n do     
    begin         
           writeln; s:=0;i_max:=i;max:=-32768;             
           for j:=1 to m do               
                begin                       
                   a[i,j]:=random(100)-50;                       
                   write(a[i,j]:4);                     
                          s:=s+a[i,j];               
               end;               
                 writeln('i: ',i,'  ',s);            
                    if s>max then             
                               begin               
                                    i_max:=i;               
                                    max:=s;             
                               end;       
                end;
  writeln; 
   writeln(i_max,'  s: ',max);
end.