Prosze o pompc bardzo prosze o pomoc

Thread View: pl.comp.lang.pascal

7 messages

[T] Back to Threads [V] Tree View [G] Group Articles

7 total messages Started by kdpiast Fri, 29 Jun 2007 08:10

#91992

Author: kdpiast
Date: Fri, 29 Jun 2007 08:10

52 lines
2463 bytes

nigdy nie pisałem programów a teraz okazuje sie że mam do napisania i 
mam problem może ktoś z Was może mi w tym pomodz

Celem ćwiczenia jest wyznaczenie i porównanie czasów wykonywania 
obliczeń przez poszczególne algorytmy sortowania.

Badane algorytmy: algorytm sortowania bąbelkowego, sortowanie przez 
proste wstawianie lub wybieranie.
  Polecenia do wykonania:
1.Posortować ciągi o następujących za pomocą wskazanych algorytmów i 
zapisać czas wykonywania sortowania przesz poszczególne algorytmy.
2.Obliczenia należy wykonać dla ciągów
(a)o długościach: 1000, 10000, 100000;
(b)o elementach losowych, elementach posortowanych od "najmniejszego do 
największego", elementach posortowanych odwrotnie.

UWAGA:
indeksy w procedurach sortowania powinny być zadeklarowane jako typu longint

Wyznaczanie czasu wykonywania obliczeń:

program czas_obliczen;
uses crt,dos;
var czas1,czas2:longint;
       godz,min, sek,ssek:word;

       a:array[0..1000] of integer;
        x,i,j,k:integer;

begin
     randomize; {inicjowanie generatora liczb losowych}
     for i:=1 to 1000 do
         a[i]:=random(10000);   {wypełnienie tablicy liczbami losowymi}

      for i:=1 to 1000 do
             write('   a[', i, '] =', a[i]);   {wypisanie tablicy}

      writeln;
      writeln;


     gettime(godz,min,sek,ssek);  {pobranie czasu}
     czas1:=100*(3600*godz+60*min+sek)+ssek;

     {sortowanie; wywołanie odpowiedniej procedury sortowania}

     gettime(godz,min,sek,ssek);
     czas2:=100*(3600*godz+60*min+sek)+ssek;

     writeln('czas obl =', czas2-czas1);
     repeat until keypressed;
end.

Re: Prosze o pompc bardzo prosze o pomoc

#91993

Author: Łukasz 'Maly' Ostrowski
Date: Fri, 29 Jun 2007 11:14

13 lines
1314 bytes

kdpiast wrote:
> nigdy nie pisałem programów a teraz okazuje sie że mam do napisania i
> mam problem może ktoś z Was może mi w tym pomodz
> <ciach>

I czego nie rozumiesz? Daj adres do prowadzącego zajęcia, od razu
wyślemy gotowy program do niego/niej, po co masz się męczyć i
sam mu to dawać, jak my możemy?

-- 
Pozdrawiam,
Łukasz 'Maly' Ostrowski.
http://maly.nemo.pl/

Re: Prosze o pompc bardzo prosze o pomoc

#91994

Author: kdpiast
Date: Fri, 29 Jun 2007 13:28

17 lines
1587 bytes

Łukasz 'Maly' Ostrowski napisał(a):
> kdpiast wrote:
>> nigdy nie pisałem programów a teraz okazuje sie że mam do napisania i
>> mam problem może ktoś z Was może mi w tym pomodz
>> <ciach>
> 
> I czego nie rozumiesz? Daj adres do prowadzącego zajęcia, od razu
> wyślemy gotowy program do niego/niej, po co masz się męczyć i
> sam mu to dawać, jak my możemy?
> 

ok wiem ale tak wyszło a jaką byś lekture polecił dla laika takm żeby 
można było szybko się tego nauczyć

ostatni program jaki napisałem sam to był na Commodore 64C w Basik-u 
pare ładnych lat temu a z tm mam pierwszy raz doczynienia i go zabardzo 
nie kumam

Re: Prosze o pompc bardzo prosze o pomoc

#91995

Author: Łukasz 'Maly' Ostrowski
Date: Fri, 29 Jun 2007 13:31

20 lines
1592 bytes

kdpiast wrote:
> ok wiem ale tak wyszło a jaką byś lekture polecił dla laika takm żeby
> można było szybko się tego nauczyć
>
> ostatni program jaki napisałem sam to był na Commodore 64C w Basik-u
> pare ładnych lat temu a z tm mam pierwszy raz doczynienia i go
> zabardzo nie kumam

Napierw jakiś prosty tutorial na necie, żebyś chwycił podstawy,
a później Marciniak, duże cieżkostrawne tomisko. ;)

p.s. na grupie jest pewien policy:
http://maly.nemo.pl/pclp/index.php?title=Main_Page
punkt drugi. ;).

-- 
Pozdrawiam,
Łukasz 'Maly' Ostrowski.
http://maly.nemo.pl/

Re: Prosze o pompc bardzo prosze o pomoc

#91996

Author: R.Koczyrkiewicz
Date: Mon, 02 Jul 2007 10:49

24 lines
1717 bytes

Polecam klasykę: N. Writh: Algorytmy+struktury danych=programy.

Tam powinieneś znaleźć większość z algorytmów które potrzebujesz ( 
sortowania).

Pozdrowienia. R.Koczyrkiewicz

Łukasz 'Maly' Ostrowski pisze:
> kdpiast wrote:
>> ok wiem ale tak wyszło a jaką byś lekture polecił dla laika takm żeby
>> można było szybko się tego nauczyć
>>
>> ostatni program jaki napisałem sam to był na Commodore 64C w Basik-u
>> pare ładnych lat temu a z tm mam pierwszy raz doczynienia i go
>> zabardzo nie kumam
> 
> 
> Napierw jakiś prosty tutorial na necie, żebyś chwycił podstawy,
> a później Marciniak, duże cieżkostrawne tomisko. ;)
> 
> p.s. na grupie jest pewien policy:
> http://maly.nemo.pl/pclp/index.php?title=Main_Page
> punkt drugi. ;).
>

Re: Prosze o pompc bardzo prosze o pomoc

#91997

Author: FD
Date: Wed, 15 Aug 2007 18:03

7 lines
1262 bytes

Łukasz 'Maly' Ostrowski napisał(a):
> Napierw jakiś prosty tutorial na necie, żebyś chwycił podstawy,
> a później Marciniak, duże cieżkostrawne tomisko. ;)

Marciniak, hmm.....

"Żółta biblia" nie wiem nigdy nie czytałem, ale podobno cały czas ma błędy.

Re: Prosze o pompc bardzo prosze o pomoc

#91998

Author: Łukasz 'Maly' Ostrowski
Date: Wed, 15 Aug 2007 21:00

21 lines
1724 bytes

FD wrote:
> Łukasz 'Maly' Ostrowski napisał(a):
>> Napierw jakiś prosty tutorial na necie, żebyś chwycił podstawy,
>> a później Marciniak, duże cieżkostrawne tomisko. ;)
>
> Marciniak, hmm.....
>
> "Żółta biblia" nie wiem nigdy nie czytałem, ale podobno cały czas ma
> błędy.

Wszystko ma błędy. Po przejrzeniu tutoriala i chwyceniu podstaw,
najlepiej imo przełknąć Marciniaka żeby chwycić kompletnie składnie i
strong typing, a później uzupełnić nowinkami z nowego Object Pascala,
klasy, operatory i takie tam. A później tylko praktyka, trening etc.
;)

-- 
Pozdrawiam,
Łukasz 'Maly' Ostrowski.
http://maly.nemo.pl/

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads