--> Archiwum Forum
Pascal_programing [ Legionista ]
nie znam się a prace domowe trzeba odrabiać :)
muszę napisać program, który po zadaniu jakiegoś pytania pod wpływem odpowiedzi ma inne wyjście; np.
Pytanie:
Gdzie chcesz iść?
Odpowiedzi:
Prosto (pojawia się okienko z napisem poszedłeś prosto)
w lewo (----II---- w lewo)
w prawo (----II---- w prawo)
Wiem że to banalnie proste, ale ja się na tym nie znam
z góry dzięki
Antharis [ Inbred Dunedain ]
A po co ci ten program? Jak do szkoły to się lepiej sam naucz :) Domyślam się, że ma być w Pascalu. Chłope, mniej czasu by ci zabrało napisanie go niż publikacja tego wątku na foum! Nie dam Ci gotowca, ale wskazówkę: Przypomnij jakimi komendami odbywa się zapisywanie i odczytywanie wartości zmiennych. Pozdrawiam
spoxmaster [ główny kozak ]
rotfl ;), to czego Ty sie uczysz w tej szkole ze takiego banału nie umiesz napisać?!
Antharis [ Inbred Dunedain ]
spoxmaster ---> pewnie grania w Kłejka, hehehe
Pascal_programing [ Legionista ]
Owszem próbowałemnapisać ten program, ale napiszcie mi to, bo ja nie mam jeszcze wprawy (zapewne jakieś drobne literówki) a pozatym podręczniki jeszcze nie doszły do szkoły i musze się uczyć z tego co było na lekcji :(
Vorador [ Pretorianin ]
program droga; uses crt; var droga:string; begin writeln('Gdzie chcesz isc?'); readln(droga); if droga='prosto' then begin writeln('Poszedles prosto'); readln; end; else if droga='w lewo' then begin writeln('Poszedles w lewo'); readln; end; else if droga='w prawo' then begin writeln('Poszedles w prawo'); readln; end; end. Nie zabardzo lubie dawac gotowce..alee co mi tam :) To jest najprostsza wersj tego programu, pokombinuj troche zeby ja rozbudowac :) A do nauki Pascala polecam ksiazki Heliona, sa naprawde dobre :) Jakby cos bylo nie tak w programie to sorki ale nie uzywalem Pascala od bardzo dawna :)) Pozdrowionka i powodzenia w programowaniu :)
Pascal_programing [ Legionista ]
dzięki Vorador zaglądaj czasem do tego wątku bo będę go z pewnością uaktywniał co jakiś czas :))
Pascal_programing [ Legionista ]
a tak na uboczu - to po var, begin, else itp. nigdy na końcu nie stawia się ";" ?
Blendon [ Generaďż˝ ]
Ja mam tylko takie male pytanie odnosnie Pascala, jak sie zrobi juz program to jak pozniej zrobic plik .exe tego programu?
Pascal_programing [ Legionista ]
musisz mieć program turbo pascal (np.) i tam masz opcję compile
KaGuSS [ Pretorianin ]
Blendon -> Trzeba go skompilować:) W środowisku TP/BP (takze innych) naciskasz F9, albo wybierasz Compile...
Pascal_programing [ Legionista ]
ej jeśli ktoś przeczytał program zrobiony przez Vorador`a to niech mi powie jak poprawić błąd, bo pokazuje "Error 4 Duplicate identifer (droga)" i wskazuje na wiersz "droga:string; "
Blendon [ Generaďż˝ ]
Pascal_programing, KaGuSS---> wow dzieki, dziala!
Skrzypu [ Pretorianin ]
Oj Stopień Stopień Stopień znaczy sie oj Vorador Vorador Vorador;P Jakie znowu else? Else stosujemy tylko w wypadku jesli jest prawda albo fałsz. Zostawić same if'y. I zastanawiam sie czy nie można by tego zrobić z case, nie nie da sie;P. Ale jak chcesz to wymyśle jak inaczej napisać ten program.
Pascal_programing [ Legionista ]
dzięki
slipknottoja [ Pretorianin ]
Jesli ktos ma pascala i nie ma firewalla to nie obrazil bym sie:) gdyby odezwal sie do mnia na gg:5473015
KaGuSS [ Pretorianin ]
A tak BTW ten program to troche dziwnie napisany.... Ja bym napisał, ale nie mam czasu:PPP
Pascal_programing [ Legionista ]
kto mi naisze ten program od nowa - bo ten jest błędny...
Zajkos [ Generaďż˝ ]
chłopie, jak ty zaczynasz rok szkolny? Bierz sie do roboty, sam napisz taki banlany program. Jak sobie bedziesz radzil potem?
Kat [ Konsul ]
uses crt; var a:string; begin clrscr; writeln (' Gdzie chcesz isc?') readln (a); writeln (' Poszedles ',a); readkey; end.
Kat [ Konsul ]
w piatej linijce barkuje ";" - ludzie ktorzy umieliby napisac taki brogram pewnie zorientowali by sie sami - inni no coz....
KaGuSS [ Pretorianin ]
To banał jest... Tylko pomyśl troszeczke... Tak btw, to ten program [z błedami] przydało by się inaczej rozwiazać, bo np. jak wpiszemy coś innego niż te trzy opcje [np. z duzej litery...] to program przeleci i nic nie zobaczymy...
ad123 [ Centurion ]
musi byc w pascalu czy nie
Pascal_programing [ Legionista ]
Dobra... ja rozumiem... Do mnie trzeba z podejściem jak do żelbetonowego kloca albo małego dziecka. W pierwszym programie wyskakuje wyżej opisany błąd. W drugim programie po skompilowaniu i uruchomieniu pisze "Rutine error 200...". Czy mógłby mi ktoś porządnie napisać ten program z trzema wyżej wymienionymi opcjami i jedną nową na jaką wpadłem - gdy odpowiedz będzie inna niż "do przodu", "w lewo", "w prawo", wyskakuje okienko z dopiskiem: "Nie ma takiej funkcji" i przy wciśnięciu dowolnego klawisza powraca wcześniejsze okno. Z góry dziękuję jeśli komuś się uda :)
Pascal_programing [ Legionista ]
a i jeszcze mi powiedzcie co oznacza rozszerzenie .sjf :)
slipknottoja [ Pretorianin ]
Kto zglasza sie na ochotnika do wyslania mi pasclala??
Hellmaker [ Nadputkownik Bimbrojadek ]
Rozczulę Was troszkę, ale Turbo Pascal 7.0 i wersje wcześniejsze wyrzucając błąd Runtime Error 200 informuje o tym, że komputer jest za szybki. To nie jest dowcip - przeczytajcie sobie na stronce Borlanda :) Programy kompilowane w TP do wersji 7.0 włącznie nie chodzą na kompach szybszych niż 200 MHz :) Na stronie borlanda można wyszperać programik ktory spowalnia zegar systemowy na czas działania programu :) Wiem, bo miałem sam kłopoty z programmem który napisałem 100.000 lat temu w TP 7.0 i wyrzucał mi ten błąd jak probowałem go odpalić na czymkolwiek szybszym niż 200 :( Dopiero na borlandzie wygrzebałem opis tego błędu.
Pascal_programing [ Legionista ]
stronie borlanda - tj.?
Pascal_programing [ Legionista ]
heelllloo jaki jest adres do strony borlanda?
KaGuSS [ Pretorianin ]
Hellmaker -> Ehh, to jest slynny blad "Runtime Error 200" :) Tak jak piszesz maci za szybkie kompy, normalka teraz, ale jest na to patch, poprawiajacy ten balda, mozna go znalezc praktycznie na kazdej stronie o Pascalu, nie trzeb a zadnych progow spowalniajacych kompa... A TP 7.0/BP 7.0 mozna znalezc na [link poniżej]... Pamietajcie TP 5.5 jest udostepniany przez Borland w formie freeware, nowsze wersje m.in te nie sa juz tego statusu:))
_Robo_ [ Generaďż˝ ]
KaGuSS -> a co jak program w pascalu jest spakowany jakims exe-packerem ;) ??