Задание 11. Умение подсчитывать информационный объём сообщения: все задания

function F(n : integer) : integer;
begin
  if n > 2 then
    F := F(n - 1) - F(n - 2)
  else
    if n = 2 then
      F := F(n - 1) * F(n - 1)
    else
      F := 3
end;

int F(int n) {
  if (n > 2)
    return F(n - 1) - F(n - 2);
  else
    if (n == 2)
      return F(n - 1) * F(n - 1);
    else
      return 3;
}

FUNCTION F(N)
  IF N > 2 THEN
    F = F(N - 1) - F(N - 2)
  ELSE
    IF N = 2 THEN
      F = F(N - 1) * F(N - 1)
    ELSE
      F = 3
    END IF
  END IF
END FUNCTION

def F(n):
  if n > 2:
    return F(n - 1) - F(n - 2)
  elif n == 2:
    return F(n - 1) * F(n - 1)
  else:
    return 3

SUB F(n)
 IF n > 0 THEN
  F(n - 1)
  PRINT n
  F(n - 2)
 END IF
END SUB

def F(n):
 if n > 0:
  F(n - 1)
  print(n)
  F(n - 2)

алг F(цел n)
нач
 если n > 0 то
  F(n - 1)
  вывод n
  F(n - 2)
 все
кон

procedure F(n: integer);
begin
 if n > 0 then
 begin
  F(n - 1);
  write(n);
  F(n - 2)
 end
end;

void F(int n){
 if (n > 0){
  F(n - 1);
  std::cout << n;
  F(n - 2);
 }
}