Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
похож на паскаль. качаешь программу qbasic, читаешь мануалы и работаешь. ничего сложно нет
используем рекурентную формулу, чтобы программу
а[n+1]=1/4
a[n]=1/2
t=(1/4)/(1/2)=1/2
a[n+1]=a[n]*1/2
program;
var n: integer; abs,s,a: real;
begin
a: =1;
eps: =1;
s: =1;
repeat
a: =a*1/2;
abs: =abs(a);
s: =s+a;
until abs< 0.001;
writeln(s);
end;
1 байт/с = 23 бит/с = 8 бит/с; 1 кбит/с = 210 бит/с = 1024 бит/с; 1 мбит/с = 210 кбит/с = 1024 кбит/с; 1 гбит/с = 210 мбит/с = 1024 мбит/с.
Популярные вопросы