Piotr Chojnacki.pl

Studia

Gdzie jestem?: piotrchojnacki.pl » Studia » Programowanie Pascal


...Ten przedmiot był naprawdę fajny. Oczywiście chodzi o język programowania Turbo Pascal. To co miałem można ogólnie omówić w kilku punktach: struktura programu, procedury i funkcje, stałe, typy i zmienne, instrukcje warunkowe i pętle, pliki tekstowe i binarne, zmienne wskaźnikowe, konstrukcja algorytmów, zasady tworzenia algorytmów, złożoność algorytmów, rekurencja, listy i drzewa, zasada dziel i zwyciężaj, sortowanie tablic, algorytmy zachłanne.

Przez II semestry zajęć z tego przedmiotu (chodzi o wykład, konwersatorium i laboratorium) napisałem wiele programów (.PAS) (Na dole strony jest instrukcja jak otworzyć pliki z rozszerzeniem .PAS). Niektóre z nich udostępniłem do ściągnięcia (zip). Polecenia (treści zadań) zapisane są w formacie pdf. Może programiki przydadzą się początkującym programistom. Ale prawde mówiąc, kto teraz zaczynając programować uczy się języka Turbo Pascal. Może dzieci w liceum tym męczą. W tej chwili na czasie jest C, C++, Java.



Przed ściągnięciem programu zapoznaj się z krótkim opisem zawartości.
Nie piszę programów na zamówienie!!



różności
  • kody Ascii przydatne do operatorów binarnych: pobierz (zip 90 KB)
  • dla ułatwnienia można ściagnąć wszystkie poniższe programy w jednym pliku:
    pobierz (zip 802 KB)


I semestr
  • prawdziwy początek, czyli programiki: witaj, suma liczb, wspólny dzielnik: pobierz (zip 10 KB)
  • sposób działania operatorów binarnych and, or, xor... : pobierz (zip 7 KB)
  • obliczanie potęgi o wykładniku naturalnym k danej liczby rzeczywistej a : pobierz (zip 56 KB)
  • sprawdzenie, czy dana liczba naturalna N jest liczbą pierwszą : pobierz (zip 54 KB)
  • zamiana liczby dwójkowej na dziesiętną : pobierz (zip 54 KB)
  • program obliczający pierwiastki równania kwadratowego : pobierz (zip 57 KB)
  • Z bardzo trudnego egzaminu pisemnego z programowania można uzyskać od 0 do 100 punktów (licząc co 0,1 pkt.). Ocena końcowa wystawiona będzie na podstawie poniższej tabeli: 2,0 - do 49,9 pkt. 3,0 - od 50 do 59,9 pkt. 3,5 - od 60 do 69,9 pkt. 4,0 - od 70 do 79,9 pkt. 4,5 - od 80 do 89,9 pkt. 5,0 - od 90 pkt. W treści funkcji wolno umieścić tylko 5 porównań! Program zawiera funkcję, której argumentem jest liczba uzyskanych punktów, a wynikiem ocena z egzaminu : pobierz (zip 89 KB)
  • Niech x mod y oznacza resztę z dzielenia liczby naturalnej x przez liczbę naturalną y. Wiadomo, że jeśli a i b są liczbami naturalnymi oraz a>=b i a mod b 0, to NWD(a,b) = NWD(b,r), gdzie r = a mod b. Wiadomo też, że jeśli a mod b = 0, to NWD(a,b) = b. Program oblicza największy wspólny dzielnik dwóch liczb naturalnych : pobierz (zip 87 KB)
  • program obliczający średnią (z dokładnością do 1) z liczb umieszczonych w tablicy : pobierz (zip 34 KB)
  • program lotto : pobierz (zip 33 KB)
  • program tabliczka mnożenia : pobierz (zip 4 KB)


II semestr

  • Programy wczytujące liczbę naturalną n i drukujące wartość n!. Pierwszy korzysta z rekurencyjnej funkcji obliczania n!, a drugi z funkcji iteracyjnej. Wyświetlnay jest również czas działania każdego z programów dla n = 10, 20, 30 : pobierz => n! rekurencyjnie (zip 47 KB)   n! iteracyjnie (zip 47 KB)

  • Programy wczytujące liczbę naturalną n i drukujące wartość n-tej liczby Fibbonaciego. Pierwszy używa funkcji rekurencyjnej, a drugi funkcji iteracyjnej. Wyświetlany jest również czas działania każdego z programów dla n = 10, 20, 30, 40. pobierz => Fib rekurencyjnie (zip 47 KB)   Fib iteracyjnie (zip 47 KB)

  • program obliczający potęgę o wykładniku naturalnym k danej liczby rzeczywistej a, działający w czasie proporcjonalnym do log(k) : pobierz (zip 53 KB)

  • program liczący wartość n-tej liczby Fibbonaciego (rekurencyjnie) i wypisujący czas działania, ale korzystający z biblioteki z rozszerzeniem .TPU, aby program działał należy również sciągnąć bibliotekę. pobierz => Fib rekurencyjnie .TPU (zip 42 KB)

  • program kopiujący pliki (UWAGA! działa na stacji dyskietek - przed uruchomieniem włóż dyskietkę): pobierz (zip 4 KB)
  • program sortujący liczby wykorzystując wskaźniki : pobierz (zip 5 KB)
  • sortowanie bąbelkowe : pobierz (zip 4 KB)
  • programik rysujący coś na ekranie (mogą wystąpić problemy z biblioteką GRAPH.TPU) : pobierz (zip 20 KB)



Jak owierać rozszerzenie .PAS  Możesz to zrobić na trzy sposoby:

  • uruchomić w programie Turbo Pascal 7.0
  • uruchomić w programie Free Pascal, który jest kompatybilny z Turbo Pascal 7.0. Możesz go ściągnąć ze strony : www.freepascal.org
  • uruchomić w programie Dev-Pascal. Możesz go ściągnąć ze strony : www.bloodshed.net
  • jeżeli nie masz żadnego z tych programów to możesz otworzyć plik w Notatniku i zobaczyć jak został napisany program
Copyright © 2004- Piotr Chojnacki. Wszelkie prawa zastrzeżone.