Выпишем числа Фибоначчи, не превышающие 46, в обратном порядке:
34, 21, 13, 8, 5, 3, 2, 1.
Для перевода в Фибоначчиеву систему счисления представим каждое переводимое число в виде суммы чисел Фибоначчи, а затем заменим использованные в записи числа единицами, а неиспользованные - нулями.
41=34+5+2 -> 10001010
46=34+8+3+1 -> 10010101
хз наверное поможет
Я считаю, что словами написано верное условие, в приведенном фрагменте ошибка: вместо x > 0 должно быть x >= 0
var x: integer;
begin
readln(x);
if x >= 0 then
x := x - 50
else
x := x + 100;
writeln(x)
end.
Пример ввода:
0
Пример вывода:
-50
А)program m;var s,i:integer;begins:= 0;i:=0;for i := 0 to 5 dos := s + 1;writeln(s,',',i);end.
Ответ: s = 6,i = 5
б)program m;var s,n,i:integer;begins:= 1;n:=1;for i := 2 to n dos := s + 1;writeln(s,',',i,',',n);end.
Ответ: s = 1, i= 2 , n = 1
Математической модели....................
Один символ - один байт, значит надо кол-во бит поделить на 8:<span>24576 /8 = 3072 символа.</span>