Poslao: 08 Nov 2010 17:51
|
offline
- necapk
- Građanin
- Pridružio: 30 Mar 2009
- Poruke: 77
- Gde živiš: Prokuplje
|
Pozdrav,
U skoli smo poceli da ucimo programiranje u Turbo Pascalu, pa sam napisao svoj prvi program.
To je program za sabiranje dva broja
Kada ga pokrenem, program radi savrseno, ali kada upisem drugi broj i pritisnem enter, program mi prikaze rezultat i odmah se zatvori automatski...
Ne znam kako to da resim....hocu da se program ne zatvara sam.....
Izvinite ako sam ubavio temu u pogresni deo foruma....
|
|
|
Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
|
|
Poslao: 08 Nov 2010 18:00
|
offline
- bocke
- Moderator foruma
- Glavni moderator Linux foruma
- Pridružio: 16 Dec 2005
- Poruke: 12486
- Gde živiš: Južni pol
|
Postavi listing programa pa da pogledamo. Generalno, da bi se program ponavljao iznova i iznova dok korisnik ne upiše recimo slovo "q" ili reč "quit", potrebno je da koristiš neku od petlji (for, while, repeat until).
|
|
|
|
Poslao: 08 Nov 2010 19:19
|
offline
- bobby
- Administrator
- Pridružio: 04 Sep 2003
- Poruke: 24135
- Gde živiš: Wien
|
Dovoljno je da kao zadnju liniju (pre "end.") ubaci jedan ReadLn, pa ce onda program da se zatvori tek kada pritisnes neki taster.
|
|
|
|
|
|
Poslao: 08 Nov 2010 20:33
|
offline
- necapk
- Građanin
- Pridružio: 30 Mar 2009
- Poruke: 77
- Gde živiš: Prokuplje
|
Hvala ti puno bas si mi pomogao....
Ovo je taj moj program
program Sabiranje;
var a,b,c:integer;
begin
writeln('Dobrodosli u program za sabiranje');
writeln('Unesite prvi broj koji zelite da saberete:');
readln(a);
writeln('Unesite drugi broj koji zelite da saberete:');
readln(b);
c:=(a+b);
writeln('Rezultat je: ',c);
ReadLn;
end.
Da, ja sam treca godina gimnazije, i ucimo u da radimo u pascalu...
|
|
|
|
Poslao: 08 Nov 2010 20:56
|
offline
- bobby
- Administrator
- Pridružio: 04 Sep 2003
- Poruke: 24135
- Gde živiš: Wien
|
Hajde da naucimo malo kulturu pisanja koda.
program Sabiranje;
var
a,b,c:integer;
begin
writeln('Dobrodosli u program za sabiranje');
writeln('Unesite prvi broj koji zelite da saberete:');
readln(a);
writeln('Unesite drugi broj koji zelite da saberete:');
readln(b);
c:=(a+b);
writeln('Rezultat je: ',c);
ReadLn;
end.
Prva linija ukazuje kompajleru da je u pitanju program (postoje i drugi tipovi izvrsnog koda koje kompajler moze da iskompjlira i linker da linkuje, ali toga se necete dotaci u srednjoj skoli, tako da cemo da preskocimo).
Onda imas blok u kojem deklarises varijable. Blok pocinje rezervisanom recju var.
Opsteprihvaceno je da ta rec stoji u zasebnoj liniji, a da deklaracije promenljivih idu u narednim linijama.
Primer:
program xyz;
var
a: integer;
b: string;
begin
...
Blok za deklarisanje varijabli se zavrsava ispred rezervisane reci begin, koja oznacava pocetak izvrsnog koda.
Linije koje pripadaju jednom bloku se uvlace za po dva karaktera zbog lakse citljivosti koda. To vazi i za petlje.
Primer:begin
WriteLn('Ovo je neka poruka');
for i := 0 to 10 do
begin
WriteLn('Ovo je poruka iz petlje, i pojavice se 10 puta na ekranu');
WriteLn('Jos jedna poruka iz petlje');
end;
end.
|
|
|
|
Poslao: 08 Nov 2010 21:03
|
offline
- necapk
- Građanin
- Pridružio: 30 Mar 2009
- Poruke: 77
- Gde živiš: Prokuplje
|
Hvala na savetima....
p.s. Brate, bolje objasnjavas od moje profesorke informatike...n
Zaboravio sam da pitam....jel moze da se napravi u paskalu....meni...
Kao
Pritisnuti Enter za pomoc....ili da vodi do nekog drugog fajla???
Nadam se da me razumes
|
|
|
|
Poslao: 08 Nov 2010 22:00
|
offline
- bobby
- Administrator
- Pridružio: 04 Sep 2003
- Poruke: 24135
- Gde živiš: Wien
|
Napisano: 08 Nov 2010 21:58
Moze u Pascalu da se uradi sve sto i u ostalim programskim jezicima.
Sada cu da te zbunim (pretpostavljam).
Kada kazes "Pascal" to se misli na sam programski jezik sa njegovom gramatikom itd.
Turbo Pascal je jedan paket za programiranje koji sadrzi:
- IDE (Integrated Development Environment) - to ti je onaj program u kojem kucas pascal programe
- kompajler, koji ce tvoj pascal program da "konvertuje" u binarni/masinski kod
- linker, koji ce tom masinskom kodu da doda sve potrebne dodatke da bi taj kod bio pravi EXE fajl
- razne biblioteke za koriscenje (recimo CRT biblioteka koja sadrzi funkcije za upravljanje kursorom i sadrzajem na ekranu)
Osim Turbo Pascala, postojale su i druge distribucije pascala, sa mozda malo drugacijim dijalektom jezika itd.
Imas i savremene distribucije paskala od kojih je mozda najpoznatiji Delphi.
Ja koristim Delphi i Lazarus/FreePascal.
FreePascal poznaje par dijalekata paskala, i multi-platformski je (mozes da pises, tacnije iskompajliras programe za Amigu, Windows, DOS, Linux...)
Zato ja malopre kazem da nije moguce da se jos uvek koristi TP, kojem je mesto u udzbenicima istorije, a ne informatike.
Dopuna: 08 Nov 2010 22:00
U sustini, nisam ti odgovorio na tvoja pitanja:
- mozes da napravis menij, i sigurno ce te to uciti na casovima
- pokretanje drugog programa nije bas jednostavna stvar, narocito zbog matorosti tog TP-a sa kojim radite, posto TP nije bio pravljen za multi-tasking platforme (sistemi na kojima mogu vise programa istovremeno da rade).
|
|
|
|
Poslao: 08 Nov 2010 22:30
|
offline
- necapk
- Građanin
- Pridružio: 30 Mar 2009
- Poruke: 77
- Gde živiš: Prokuplje
|
Mislio sam ako se pravi neki veci program, da se podeli na delove, i onda da se napravi jedan koji ce sve da ih poveze....zato sam rekao ono "pritisnuti ENTER..."
|
|
|
|