kabat - 2007-11-04 18:25:36

Nie umiem zrobic tego algorytmu. Pomoze ktos? :D

lecho - 2007-11-04 21:18:50

tak się składa że ja też nie  umiem
główkowałem główkowałem i...
dołączam się do prośby ^.^

Kyzb - 2007-11-04 22:05:41

Też główkowałem ale ni huhu... Może na przerwie się coś uda zdobyć bo dzisiaj to już nikłe szanse ;/

pogo - 2007-12-15 23:09:47

co trzeba bylo zrobc na informatyke, tzn ona mowila, ze napisac w pascalu jakis algorytm, ale jaki?

Sanczo - 2007-12-16 15:46:07

ja też próbowałem...nawet poduczyłem się pascala w necie...ale ni huja nie umiem...dołączam się do prośby

War_Kurt - 2007-12-16 19:49:30

wogóle o co chodzi? ;p. Co ma robić ten algorytm?

kamiprok - 2007-12-16 19:58:39

Zadanie 3/67

  Podaj algorytm wyszukiwania najmniejszej liczby wśród n liczb całkowitych wczytanych jako dane w kolejnych przebiegach pętli. n=4, zbór liczb: {-3, 6, -4, 0}.

Na podstawie tego algorytmu napisać program w pascalu.

War_Kurt - 2007-12-16 21:18:49

Czyli ogolnie... najpierw podajesz ile liczb... czyli n liczb... potem robisz petle n razy powtarzajaca sie z kolejnym wczytywaniem i porownywaniem wynikow... a pod koniec wywalenie wyniku... dobrze zrozumialem?

War_Kurt - 2007-12-16 21:35:19

Dobra... dokłądnie teraz nie pamiętam, ale załapcie pomysł i przeróbcie by działało
program cos
var a,b,n: longint
Begin
Writeln('jakies głupoty i podaj n');
readln(n);
Writeln ('wprowadz pierwsza pierwsza liczbe');
readln (a); //wczytujemy liczbe pierwsza z dajmy na to 4
n:=n-1; //teraz już 3
While a>0 do
begin
Writeln('wprowadz b');
readln(b); //druga liczba
n:=n-1; //teraz juz 2
if a>b then a:=b;  //warunek sprawdzajacy dzieki czemu będą porownywane tylko najmniejsze wartosci
end; // koniec petli while
Writeln('najniejsza warotść to')
read(a)
end.


Pewno dużo jest błędów z przecinkami itd. itd... ale robiłem to na szybko z głowy nie mam teraz czasu na takie duperele... Mam nadzieje że wam to pomoże

War_Kurt - 2007-12-16 21:40:05

powinno teoretycznie dzialac ;/... nie mialem czasu sprawdzac. Na początku możecie dać if sprawdzający czy n jest równe 0... jak chcecie... bawcie się

www.tibia-ots.pun.pl www.digimon.pun.pl www.hardcoreclan.pun.pl www.conterstrikeworld.pun.pl www.boxmanager.pun.pl