Emurovy programy v PASCALU

11.1. 2002. Konečně jsem se dostal k uveřějnění některých mých prográmků v Pascalu. Některé z nich Vám mohou být i trochu užitečné. Programy lze spouštět v operačních systémech Windows a MS DOS. 

Jestliže máte procesor rychlejší než 300MHz tak Vám nepůjdou spustit zdrojové programy *.pas (jakékoliv), překadač ohlásí runtime error. Nahrajte si proto patch (v google dejte vyhledávat "pascal patch" nebo něco podobného..) tj. 2 soubory, které zkopírujte pod TP7\BIN\, toť vše.


*.EXE

*.PAS

Název programu

Popis programu

download EXE file

download PAS file

Ascii helper 

Ascii tabulka, ve které se pohybujete šipkama a vidíte číslo znaku (např. @...64). Dále ze stiknuté klávesy určí její ordinální hodnotu.

download EXE file

download PAS file

Adresář

Program, který jsem dělal do školy, jinak bych ho udělal trochu jinak (nebo spíš nijak:-). Jedná se o takovou jednoduchou evidenci osob. Můžete v ní vyhledávat, mazat, třídit atd. Údaje jsou uloženy v typovém souboru.

download EXE file

download PAS file

Hádání

Velice jednoduchá hra, máte za úkol uhodnout číslo od 1 do 100, které si počítač myslí.

download EXE file

download PAS file

Hexa

Převadeč čísla z desítkové soustavy do hexadecimální tj. 123456789ABCDEF

download EXE file

download PAS file

Kalendář

Kalendář pro rok 2OO2, přehledný, jednoduchý.

download EXE file

download PAS file

Mocniny

Počítání mocnin i se zápornými čísly. Program je ošetřen vůči zadání písmen na vstupu - nezhroutí se.

download EXE file

download PAS file

Násobení matic

Vynásobí dvě matice, přehledný výstup na obrazovku.

download EXE file

download PAS file

Test znalostí

Otestuje Vaše vědomosti a dá Vám známku. Otázky se zadávají do textového souboru "otazky.txt", můžete je tedy měnit bez nutnosti znovu překládat program.

download EXE filedownload PAS filePráce s polemVygeneruje náhodné pole a setřídí ho pomocí různých metod, vyhledá prvek pomocí půlení intervalu.
download EXE filedownload PAS filePrvočíslaPo zadání intervalu spočítá prvočísla. Dále napíše čas a počet prvočísel. Rychlejšího algoritmu se dá dosáhnout pomocí Erastotenova síta.
download EXE filedownload PAS fileÚprava textuUpraví délku řádků textového souboru "vstup.txt" na hodnotu, kterou zadáte.
download EXE filedownload PAS fileSpeaker playerPřehrává frekvence od 20Hz do 18kHz, ovládá se šipkama.

zpět na úvod