Pascal programy matematika

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Stránky: [1-10]  [11-20]  [21-30]  [31-40]  [aktuální]  [51-60]  [61-70]  [71-80]  [81-90]  [91-100]  [101-150]  [151-169]

Pořadí:41
Autor: Pheo
web: pascalsource.ic.cz

Program: Exchange.pas

Zámena valút + percento za manipulačný poplatok.


Pořadí:42
Program: Faktoria.pas

Vypočíta faktoriál čísla. Použije pritom metódu logaritmov. Veľmi rýchle.


Pořadí:43
Autor: Andrej Muntag
Program: Faktorial3.pas
Soubor exe: Faktorial3.exe

Jednoduchý program na vypočítanie faktoriálu ale len do 12. Potom sa dostáva do vysokých čísel, ktoré nedokáže spracovať.


Pořadí:44
Autor: Pheo
web: pascalsource.ic.cz

Program: Fibonacciho_cisla.pas

Kolko parikov zajacov budeme mat po jednom roku, ak plati. Na zaciatku mame jeden par, kazdemu paru sa po mesiaci narodi vzdy dalsi par a ostatni nezomieraju prirodzenou ani nasilnou smrtou. vyjadruje to postupnost cisel nazyvana Fibonaciho cisla, v ktorej kazde nasledujuce cislo dostaneme ako sucet dvoch predchadzajucich. Plati : F0=0, F1=1, F2=1, F3=2, F4=3, F5=5, F6=8, F7=13, F8=21 ...


Pořadí:45
Program: Func.pas
Vývojak: Func.jpg

Výpočet a tlač hodnôt funkcie do tabuľky. Funkcia y = (1.5x + 13.5/x)/(2x-1) ak x je z intervalu <0,5> s krokom K=0,5.


Pořadí:46
Program: Func2.pas
Vývojak: Func2.jpg

Výpočet hodnôt funkcie z = 3 + x + 1/ y - 4. Výpočet sa skončí zadaním y=4. Jednotlivé hodnoty najprv načíta do poľa. Výsledky (aj načítané x,y) vytlačí v tabuľke.


Pořadí:47
Program: Functab.pas
Vývojak: Functab.jpg

Výpočet a tlač hodnôt funkcie y= (2,5x-11,1) / (2x-1), ak x je z intervalu od 0 do 3 s krokom k=0,5.


Pořadí:48
Program: Funkcia.pas

Vypočíta funkciu y=xe^(x+1) pre 5 zadaných čísel.


Pořadí:49
Program: Ga_priem.pas
Vývojak: Ga_priem.jpg

Načítanie N trojíc ľubovoľných čísel A,B,C z ktorých sa vypočíta aritmetický a geometrický priemer. Výsledok pre jednotlivé trojice sa tlačí v tvare tabuľky.


Pořadí:50
Autor: Aleš Kucik
web: www.webpark.cz/prog-pascal

Program: Gauss.pas
Soubor exe: Gauss.exe

Tento jednoduchý prográmek slouží k výpočtu neznámých soustav lineárních rovnic. Využívá Gaussovy eliminace, která lze snadno vyjádřit jako algoritmus. Dejme tomu že máme lin. rovnice

Račte si to vyzkoušet sami. Program je limitován konstantou MAX na 10 neznámích, ale klidně můžete tuto konstantu zvětšit.

Stránky: [1-10]  [11-20]  [21-30]  [31-40]  [aktuální]  [51-60]  [61-70]  [71-80]  [81-90]  [91-100]  [101-150]  [151-169]