Для стека:
const
MAX_SIZE = 100;
var
size, n: integer;
stack: array[1..MAX_SIZE] of integer;
procedure push(a: integer);
begin
inc(size);
stack[size] := a;
end;
procedure view;
var
i: integer;
begin
for i := 1 to size do
write(stack[i], ' ');
writeln;
end;
Для очереди:
const
MAX_SIZE = 100;
var
head, tail: integer;
queue: array[1..MAX_SIZE] of integer;
procedure push(a: integer);
begin
queue[tail] := a;
inc(tail);
end;
procedure view;
var
i: integer;
begin
for i := head to tail - 1 do
write(queue[i], ' ');
writeln;
end;
Объяснение:
Можно лучший , и учи C++
Январь - 2 кролика(+2) - 1 пара.
Февраль - 2 кролика (+0) - 1 пара.
Март - 4 кролика (+2 от первой пары) - 2 пары.
Апрель - 6 кроликов (+2 от первой пары) - 3 пары.
Май - 10 кроликов (+2 от первой и +2 от второй пары) - 5 пар.
Июнь - 16 кроликов (+2 от первой, +2 от второй, +2 от третьей пары) - 8 пар.
ответ: 8 пар.
По факту количество пар совпадает с числами Фибоначчи т.к. единая формула для решения данной задачи начиная с февраля первого года такова:
N(пар кроликов в этом месяце)=N(пар в предыдущем)+N(пар 2 месяца назад)
4)4
Объяснение: