for i: =1 to n do (n-колличество членов, вводится с клавиатуры)
begin
k: =k*i;
f: =k;
sumf: =sumf+1/f;
end;
(while)
function sumw(i: integer): real;
begin
k: =1;
i: =1;
sumw: =1;
while i< =n do
begin
k: =k*i;
f: =k;
sumw: =sumw+1/f;
end;
(repeat)
function sumr(i: integer): real;
begin
k: =1;
i: =1;
sumr: =1;
repeat
k: =k*i;
f: =k;
sumr: =sumr+1/f;
i: =i+1
until i< n;
Ответ дал: Гость
если по обем чашечкам разложить сначала по одной детали так, чтобы они уравновесились .предположим, что деталь весит больше чем три остальные. на чашечки положить еще по одной детали, и одна чашечка перевесит другую.та верхняя деталь, что была на чашечке которую перевесили и есть необходимая. если же деталь весит больше чем все остальные, то все сделать наоборот.
Ответ дал: Гость
"у семи нянек дитя без глаза." - 30 символов(" -2, . -1, пробел-5, букв-22) ⇒
30*2=60 байт
60*8=480 бит
Ответ дал: Гость
информатика - наука о способах получения, накопления, хранения, преобразования, передачи, защиты и использования информации.
информация - сведения о чем-либо, независимо от формы их представления.
информационные технологии - широкий класс дисциплин и областей деятельности, относящихся к технологиям создания, и обработки данных, в том числе с применением вычислительной техники
Популярные вопросы