| 
| 
Napišimo program koji će korisnika tražiti 2 broja, te će ispisati njihov zbroj, umnožak i razliku.
program upisispis;
var broj1, broj2, zbroj, umnozak, razlika:integer;
begin
write('Upisite prvi broj: ');
readln(broj1);
write('Upisite drugi broj: ');
readln(broj2);
zbroj := broj1 + broj2;
umnozak := broj1 * broj2;
razlika := broj1 - broj2;
writeln('Zbroj: ', zbroj);
writeln('Umnozak: ', umnozak);
writeln('Razlika: ', razlika);
readln;
end.
Pokušajmo red po red vidjeti što naš program radi.
Naredba program nam služi samo da bi dali ime programu. Zapravo na nikakav način ne utječe na ništa :/
Naredba var označava da slijedi upis varijabli. Mi koristimo varijable broj1 i broj2 za spremanje upisanih brojeva, te zbroj, umnozak i razlika za sremanje (doh! :) ) zbroja, umnoška i razlike. Sve naše varijable su tipa integer, što označava cijele brojeve.
begin označava početak programa. Iza ovog reda pišemo naredbe koje će se izvršavati.
Naredbu write koristimo za ispisivanje na ekran, te u njoj govorimo našem programu što točno da ispiše. Razlog zašto ne koristimo writeln u ovom slučaju je taj što writeln prelazi u novi red nakon što ispiše dan tekst. Na ovaj način će mjesto za upis teksta (naredba readln) biti odmah nakon teksta "Upisite prvi broj: ".
Naredbu readln koristimo za upis podataka u računalo. Varijabla u zagradi jednostavno označava gdje će se upisani podatak spremiti (u našem slučaju će se prvi upisani broj upisati u varijablu broj1).
Nakon toga ponavljamo naredbe write i readln za malim modifikacijama - ispisujemo "Unesite drugi broj" i upisano spremamo u broj2.
Do sada smo samo upisali podatke u naše varijable. Sada je potrebno računati zbroj, umnožak i razliku upisanih brojeva. To radimo na način da prvo napišemo varijablu u koju podatke želimo spremiti, zatim znak :=, a nakon toga izraz koji želimo izračunati. U našem slučaju, linija koda zbroj := broj1 + broj2 govori programu da zbroji brojeve broj1 i broj2, te da izračunato spremi u varijablu zbroj. Jednostavno!
Na isti način računamo i umnožak i razliku, samo naravno, umjesto znaka + koristimo * i -.
Naredni redovi su jednostavno ispis rezultata :)
Na kraju stavljamo readln, jer bez njega program izlazi čim obavi sve što je trebao. Na ovaj način program čeka da pritisnemo enter, te tek tad izlazi.
end (obavezno sa točkom na kraju) označava, naravno, kraj.
PS. Uskoro dolaze lekcije iz FOR, WHILE i REPEAT petlje!
gost
kaže:
 |
... Da li biste mogli pokazati zadatak kako ucitati sve parne brojeve .. od jedan do n i zbrojiti ih? |
Ažurirano (Petak, 25 Veljača 2011 11:12)
Istaknite svoj oglas i povećajte posjećenost do 6 puta
Stranica Moje Instrukcije za vrijeme školske godine bilježi preko 100 000 posjeta mjesečno, stoga nemojte propustiti priliku i popunite svoje slobodne termine s nama.
|
Imate objavljen oglas, istaknite ga:
|
 |
Pišite lekcije i povećajte posjećenost svog oglasa
Pišite kratke lekcije i pomognite djeci u njihovoj potrazi za znanjem, a vaš oglas će biti prikazan u vrhu lekcije koju ste napisali. Na taj način možete i jednostavno dogovoriti instrukcije umjesto da vas traže preko tražilice u moru ostalih instruktora.