var
p: real;
d, a1, i : Integer;
begin
a1 := 9;
d := 4;
p := 1;
for i := 1 to 8 do
p := p * (a1 + (i - 1) * d);
Write( p:0:0 );
end.
Уменьшится в 2 раза.
в юникоде сообщение составляет 40 байт, в кои-8 - 20 байт.
значит и уменьшится на 20 байт
Гипертекстовым называют документ, который использует внутри себя ссылки на другие документы или сайты. Другими словами это текстовый документ, в котором имеются специальные метки теги. Они используются и распознаются всеми браузерами как переход на другую страницу или документ, тем самым кликнув на ссылку, мы автоматически перенесемся по указанной ссылке на сайт, который указан в ссылке под тегом.
<span>16384 бит / 8 = 2048 байт
2048 байт / 1024 = 2 Кб
решалось при условии по умолчанию 1Кб = 1024 байт
Если подразумевались другие сокращения, то надо было уточнять) </span>
Ответ:
program p_1;
const n=15;
var i:integer;
p:real;
a:array [1..n] of integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(130)-50;
writeln('a[',i,'] = ',a[i])
end;
p:=1;
for i:=1 to n do p:=p*a[i];
writeln;
writeln('p = ',p)
end.