Program z;
var i,sum:integer;
sr:real;
a:array[1..22] of integer;
begin
for i:=1 to 22 do
begin
a[i]:=random(9)+1;
sr:=sr+a[i];
end;
sr:=sr/22;
for i:=1 to 22 do
begin
if (a[i]<sr) then
sum:=sum+1;
writeln(a[i]);
end;
writeln(sum);
end.
Чаще всего в организациях для хранения информации используются именно реляционные базы данных. База данных — это набор таблиц, состоящих из столбцов и строк, аналогично электронной таблице. Каждая строка содержит одну запись; каждый столбец содержит все экземпляры конкретного фрагмента данных всех строк.
1) 8, 2) килобайт-1536, мегабайт-1.5 3) 1 (вроде) , 4) не знаю, 5) 2.097152 мегабайт
256 1024 16384
1) сосиску из 9 укусов можно съесть 2^8 способами = 256
2) из 11 укусов: 2^10=1024
3) из 15 укусов: 2^14=16384