Поскольку время передачи файла одинаковое, узнаем во сколько раз уменьшилась скорость передачи:
v₁/v₂ = 3072/256= 12
Таким образом объем информации тоже уменьшится в 12 раз:
60 Кбайт/12= 5 Кбайт
быстро, удобно, не тратишь бумагу)))) , конверта не надо и тд
1/8Кб=1024 бита
1024/256=4 бита - весит 1 символ
N=2^i
N=2^4=16 символов
program Positiv;
var i:integer; x,sum:real;
begin
sum:=0;
for i:=1 to 10 do
begin
write('введите ',i,'-е число: ');
readln(x);
if x>0 then sum:=sum+x;
end;
writeln('Cумма положительных чисел равна ',sum);
end.
===== PascalABC.NET
begin
var s := 0.0;
for var i := 1 to ReadInteger('n =') do
s += 1 / Sqrt(i);
Println(s)
end.