509 - 196 - 1 = 312 цифр между ними
Для решения задачи используется формула Хартли: N = 2^i или i = log(2)N
Количество целых чисел в диапазоне [5..20] - 16 (20-5+1=16).
Количество информации об угаданном числе = log(2)16 = 4 бита (2^4=16).
Не будут. Потому что РИСОВАНИЕ в библиотех графики Паскаля.
var
i: Integer;
Af: array [1..10] of Integer;
begin
Af [1] := 1; // первый член ряда равен 1
Af [2] := 1; // второй член ряда равен 1
for i := 3 to 10 do begin // цикл, начинающийся с 3-го члена до заданного (десятого)
Af [i] := Af [i - 2] + Af [i - 1]; // каждый член ряда равен сумме двух предыдущих
end;
for i := 1 to 10 do begin // вывод на экран первых 10 членов ряда
Write (Af [i], ', ');
end;
end.
// ------ 2-й вариант (без использования массива) ---------
var
a, b, c, i: Integer;
begin
a := 1;
Write (a, ', ');
b := 1;
Write (b, ', ');
for i := 3 to 10 do begin
c := a + b;
Write (c, ', ');
a := b;
b := c;
end;
end.
6)Повтори 5[направо 50 вперед 80];
7)D;
8)A.