То эта информация полезная... :)
запишем условие: V=10Кб/с, t=5 сек, I-?
решение: количество переданной информации можно рассчитать по формуле I=V*t
Выразим скорость передачи информации в байтах/сек
V=10*1024 =10240 б/сек
Теперь найдем I=10240*5=51200 байт это и есть решение задачи
Алфавит,содержащий два символа, называется двоичным алфавитом.
Поэтому для кодирования 26 символов достаточно пятиразрядного кода.
Var a:array[1..100] of integer;
n:integer;
begin
read(n);
for I:1 to n do
begin
a[i]:=0;
end;
end.
Если я всё правильно понял, то вот:
var x: array [0..15] of integer;
sum,pr,i,max:longint;
begin
randomize;
sum:=0;
pr:=1;
For i:=1 to 15 do x[i]:=random(5)+1;
For i:=1 to 15 do
begin
sum:=sum+x[i];
pr:=pr*x[i];
end;
if pr>sum then max:=pr else max:=sum;
writeln(max);
<span>end.</span>