{общий член последовательности можно задать формулой Sn=((An-1)+(Bn-1))/(An-1) где A- числитель, В - знаменатель }
const n=10; var A,B,C,i,k: integer; begin A:=1; B:=1; { вывод последовательности на экран } for i:=2 to n do begin C:=A; A:=A+B; B:=C; writeln(i,' -> ',A,'/',B); end; { подсчет k - го члена } k:=20; A:=1; B:=1; for i:=2 to k do begin C:=A; A:=A+B; B:=C; end; writeln(k,' - ый элемент = ',A,'/',B); end.
9. Передача велась 42 секунды со скоростью 256000 бит/с, следовательно, было передано 256000 * 42 бит информации. Для перевода в Кбайт, полученное число необходимо поделить на 8 (бит -> байт) и на 1024 (байт -> Кбайт).
Размер файла: 256000 * 42 / 8 / 1024 = 1312,5
10. Варианта два: перевести скорость в Кбайт или объем сообщения из Кбайт в биты.
const n=10;
var A,B,C,i,k: integer;
begin
A:=1; B:=1;
{ вывод последовательности на экран }
for i:=2 to n do
begin
C:=A; A:=A+B; B:=C;
writeln(i,' -> ',A,'/',B);
end;
{ подсчет k - го члена }
k:=20; A:=1; B:=1;
for i:=2 to k do
begin
C:=A; A:=A+B; B:=C;
end;
writeln(k,' - ый элемент = ',A,'/',B);
end.
9. 1312 Кбайт
10. 14 сек.
Объяснение:
9. Передача велась 42 секунды со скоростью 256000 бит/с, следовательно, было передано 256000 * 42 бит информации. Для перевода в Кбайт, полученное число необходимо поделить на 8 (бит -> байт) и на 1024 (байт -> Кбайт).
Размер файла: 256000 * 42 / 8 / 1024 = 1312,5
10. Варианта два: перевести скорость в Кбайт или объем сообщения из Кбайт в биты.
Воспользуемся первым вариантом: 128000 / 8 / 1024 = 15,625 Кбайт/с.
Время передачи составило: 229 / 15,625 = 14,656 сек.