ОС это не информационная, а только операционная система. Она только позволяет использовать программы, которые будут информационной системой, но сама по себе голая ОС ничего такого не делает
Var K,n:integer;
S:real;
Begin
n:=0;
Write('K = ');ReadLn(K);
For K:= 1 to K do
Begin
Write((12*K-21)/3,' ');
if (12*K-21)/3 > 0 then
Begin
S:=S+(12*K-21)/3;
n:=n+1
End;
End;
WriteLn;
Write('Sr = ',S/n)
End.
Если это был былый шар, то он его достал из чёрных, так как в смеси были бы только чёрные, если это чёрный шарик, то он его достал из коробки белый, , так как в смеси были бы только белые.
Каждый человек желает знать где берут мозоль
№7
1.44 Мбайт=1474,56 КБайт
1474,56 : 100 = 14 , Ответ : 14 файлов