Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
используем рекурентную формулу, чтобы программу
а[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;
напишите цель . то что у вас написано - полный бред. который после устранения синтаксических ошибок(а их тут не одна) работать не будет
количество кбайт умножаете на 1024 получаете количество символов 3,5*1024=3584
иванов - парикмахер
петров - плотник
сидоров - мельник
гришин - почтальон
алексеев маляр
Популярные вопросы