Új hozzászólás Aktív témák

• #14086 janos1988 addikt janos1988 #14084

  Új Válasz 2020-04-16 13:13:05 #14086

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  janos1988

  addikt

  válasz janos1988 #14084 üzenetére

  Vagyis de, egy kis trükkel, de ez már nem eljárás, hanem függvény.

  function vicc(n:integer):boolean;
begin
    if n<=0 then vicc:=false
            else
                begin
                    writeln(n);
                    vicc(2*n);
                    writeln(n);
                end;
end;

Új hozzászólás Aktív témák