Programski jezik Dev-Pascal
Razgranta strukura - IF THEN

  I IF - THEN  
1 Sa tastature upisati broj. Ako je veći od nule napisati "BROJ JE POZITIVAN". Dev-Pascal
2 Sa tastature upisati broj. Ako je jednak nuli napisati "BROJ JE NULA". Dev-Pascal
3 Sa tastature upisati broj. Ako je manji od nule napisati "BROJ JE NEGATIVAN". Dev-Pascal
4 Sa tastature upisati broj. Ako je različit od nule napisati "BROJ NIJE NULA". Dev-Pascal
5 Učitati a. Ispisi a, ako je učitani broj pozitivan. Dev-Pascal
6 Učitati a. Ispisi a, ako je učitani broj jednak nuli. Dev-Pascal
7 Učitati a. Ispisi a, ako je učitani broj negativan. Dev-Pascal
8 Učitati a. Ispisi a, ako je učitani broj je različit od nule. Dev-Pascal
9 Provjera vrijednosti za uslov x>-2? Dev-Pascal
11 Provjera vrijednosti za uslov x>y? Dev-Pascal
12 Provjeri da li je upisani broj x paran. Ako jeste ispiši paran. Dev-Pascal
13 Provjeri da li je upisani broj x neparan. Ako jeste ispiši NEPARAN. Dev-Pascal
14 Provjeri da li je upisani broj x djeljiv sa 3. Ako jeste ispiši DJELJIV SA 3. Dev-Pascal
15 Provjeri da li je upisani broj x nije djeljiv sa 3. Ako je istina ispiši NIJE DJELJIV SA 3. Dev-Pascal
16 Učitati a, Ako je a djeljiv sa 7, Ispisati DJELJIV. Dev-Pascal
18 Učitati a, Ako je a djeljivo sa 5, Ispisati DJELJIV. Dev-Pascal
19 Učitati a, Ako nije a djeljivo sa 5, Ispisati NIJE DJELJIV. Dev-Pascal
20 Provjeriti da li je od dva upisana broja prvi djeljiv sa drugim. Ako jeste ispisati DJELJIV. Dev-Pascal
21 Provjeriti da li je od dva upisana broja prvi djeljiv sa drugim. Ako nije ispisati NIJE DJELJIV. Dev-Pascal
22 Provjeriti da li je suma dva učitana broja parna. Ako jeste ispisati PARAN. Dev-Pascal
24 Napisati program za ispis recipročne vrijednosti broja ako je različit od nule. Dev-Pascal
25 Napisati program za ispis recipročne vrijednosti broja, ako je razlicit od nule. Ako je nula napisati da je nedefinisan izraz. Koristiti dvije IF naredbe. Dev-Pascal
26 Provjeriti da li je učitani broj jednocifren. Ako jeste ispisati JEDNOCIFREN. Dev-Pascal
27 Provjeriti da li je suma dva učitana broja jednocifrena. Ako jeste ispisati JEDNOCIFREN. Dev-Pascal
34 Provjeriti da li je razlika dva učitana broja dvocifrena. Ako jeste ispisati DVOCIFREN. Dev-Pascal
35 Provjeriti da li je suma dva učitana broja nije dvocifrena, tada ispisati NIJE DVOCIFREN. Dev-Pascal
37 Ispisati da li je učitani broj trocifren. Ako nije, ispisati NIJE TROCIFREN. Dev-Pascal
38 Provjeriti da li je suma dva učitana broja trocifrena. Ako jeste ispisati TROCIFREN. Dev-Pascal
40 Provjeriti da li je suma dva učitana broja nije trocifrena, tada ispisati NIJE TROCIFREN. Dev-Pascal
43 Napisati program za ispis uspjeha na osnovu ocjene. Dev-Pascal
44 Napisati program za ispis uspjeha na osnovu prosjeka. Dev-Pascal
45 Sa tastature upisati 0 ako ne treba nositi kišobaran, a 1 ako treba nosti kišobran.. Dev-Pascal
46 Sa tastature upisati riječ. Ako se upiše BASIC ili Pascal ispisat: "Ispisano je ime programskog jezika".Sa  tastature  upisati  ime.  Ako upišete  ANDRIC  ispisati "To je veliki pisac". Dev-Pascal
47 Učitati dva broja i sabrati: Provjeriti da li dobijena suma djeljiva sa prvo učitanim brojem. Dev-Pascal
  III Generisanje broja  
48 Provjeri da li je generisani jednocifren broj paran. Ako jeste ispiši paran. Dev-Pascal
50 Provjeri da li je generisani jednocifren broj djeljiv sa 3. Ako jeste ispiši DJELJIV SA 3. Dev-Pascal
56 Provjeri da li je generisani dvodnocifren broj paran. Ako jeste ispiši paran. Dev-Pascal
64 Provjeriti da li je od dva generisana dvodnocifrena broja prvi djeljiv sa drugim. Ako jeste ispisati DJELJIV. Dev-Pascal

    abc Algoritmi    abc BASIC    abc Turbo Pascal    abc C++    abc Java    abc C    abc Python    abc Dev-Pascal    Index