В записи реляционной базы данных (БД) может содержаться неоднородная информация (данные разных типов).
В таблицу можно забить любой тип информации.
Надеюсь что это нужно выполнить на паскале
4. var a: array[1..20] of integer;
p,i:integer;
begin
p:=1;
for i:=1 to 20 do
begin
a[i]:= random(20);
write(a[i]:3);
end;
writeln;
for i:=1 to 20 do
if a[i] mod 2 = 0 then p:=p*a[i];
writeln(p);
end.
5. var a: array[1..100] of integer;
sum,i:integer;
begin
for i:=1 to 100 do
begin
a[i]:= random(100);
write(a[i]:4);
end;
for i:=1 to 100 do
sum:=sum+a[i];
writeln;
writeln(sum);
end.
6. var a: array[1..20] of integer;
sum,i:integer;
begin
writeln('Исходный массив');
for i:=1 to 20 do
begin
a[i]:= random(20);
write(a[i]:3);
end;
for i:=1 to 20 do
if a[i]<10 then
a[i] :=0;
writeln;
writeln('Итоговый массив');
for i:=1 to 20 do
write(a[i]:3);
end.
2 ^29 бит = 2^29 / 2^3 байт = 2^26 байт
2^26 байт=2^26 /2^10=2^16 килобайт
2^16 килобайт=2^16/2^10=2^6 мегабайт=64 мегабайт
0,125 гб = 0,125 ✕ 1024 = 128 мегабайт
128 + 64 = 192 мегабайт
Вставка, смотря какой редактор, если основа MS то на главной панели.
Будет выглядеть как
s:=sqr(a)+(2*a*b*c)+sqr(b)-(4*c);