Небольшая компания, состоящая из трех подразделений, - вопрос №15033594 от Ksushhha00 11.09.2021 12:41

Question

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

Ksushhha00 · Answer

Const    handsfree = false;var    a: array[1..100] of real;    i, n: integer;begin    {ввод массива}    if handsfree then        n := random(20) + 5    else begin        write( n = );        readln(n);    end;        writeln( Данные массива: );    for i := 1 to n do    begin        if handsfree then begin            a[i] := random(100) - 50;            write(a[i], );        end        else readln(a[i]);    end;    writeln();        {изменение элементов}    for i := 1 to n do    begin        if i...