Matematické Fórum
Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
#2 24. 09. 2016 11:28
Re: Pascal
↑ 899j:
Ahoj,
nad tímhle se asi musíš prostě zamyslet, podle mě na to neexistuje žádný univerzální postup.
Když nevíš, jak něco napsat, vždycky to najdeš na netu. Takže googluj o sto šest a myslím, že tam vždy najdeš odpověd.
Já jsem si například funkci Trunc taky musel vygooglit, protože funkce Round na to nefunguje tak, jak potřebujeme.
Code:
procedure pyramida (const c,n : integer);
begin
if n>1 then pyramida(Trunc(c/10), n-1);
writeln(c,' * 8 + ',n,' = ',(c*8+n));
end;
begin
pyramida(123456789,9);
readln;
end.Offline