Не использовать предложения длиннее 15 слов.
Не использовать более трех определений к одному существительному.
Не использовать сложносочиненные предложения.
В каждом предложении должно быть подлежащее и сказуемое.
В одном предложении не допускается более одного деепричастного оборота.
Должен быть подготовлен список из 5000 наиболее распространенных слов русского языка и профессиональных терминов. Слова и аббревиатуры, не входящие в этот список, могут быть употреблены только по согласованию с руководством проекта.
Названия конкурирующих организаций могут употребляться только негативном контексте. В письменной речи упоминание конкурирующей организации должно сопровождаться пояснением в скобках: «(конкурирует с нами, контакты с этой организацией должны быть ограничены)».
В рабочее время не допускается обсуждение политики компании. В мире много несправедливости, и в том числе несправедливость может исходить от нашей компании. Но это не означает, что компания должна оплачивать время, потраченное на обсуждение этой несправедливости.
В случае недопустимого с точки зрения этих правил общения руководство проекта должно быть извещено в письменной форме.
Табуированную лексику разрешается использовать только для ясности и четкости изложения своих мыслей. Табутрованная лексика не допускается:
Если ее применение приводит к нарушению предыдущих 9 пунктов.
Для выражения своего отношения к содержанию предыдущих 9 пунктов.
Відповідь:
Відповідь:procedure TForm1.Button2Click (Sender: TObject);
var a: array [1..10] of integer; i, j, min, nmin: integer;
begin
for i : 1 to 10 do
a[i] : StrToInt (Memo1.Lines[i-1]);
for i : 1 to 9 do
begin
min : a[i];
nmin : i;
for j : i+1 to 10 do
if a[j] < min then
begin
min : a[j]; nmin : j;
end;
a[nmin] : a[i];
a[i] : min;
end;
Memo2.Lines.Clear;
for i : 1 to 10 do
Memo2.Lines.Append (IntToStr (a[i]))
end;
Пояснення:
Початкову суму грошей помножити на А*N
