Pascal I.      Pascal II.      Delphi       Linkek     
Pascal I.
01. A program szerkez...
01. Gyakorló feladatok
02. Változók használata
02. Gyakorló feladatok
03. A FOR ciklus
03. Gyakorló feladatok
04. Egymásba ágyazo...
04. Gyakorló feladatok
05. Karakterláncok ...
05. Gyakorló feladatok
06. Az IF feltételvizsgálat
06. Gyakorló feladatok
07. A CASE elágazás
07. Gyakorló feladatok
08. A WHILE..DO ciklus
08. Gyakorló feladatok
09. A REPEAT..UNTIL ...
09. Gyakorló feladatok
10. Tömbök (ARRAY ...
10. Gyakorló feladatok
11. Műveletek tömbökkel
11. Gyakorló feladatok
12. Kétdimenziós töm...
12. Gyakorló feladatok
13. Műveletek kétdime...
13. Gyakorló feladatok
Programozás 1 (Pascal)  
     2 Gyakorló feladatok
  1. A program számítógépbe írása nélkül határozzuk meg, hogy mit ír ki a képernyőre a következő program, majd futtasuk le számítógépen is, hogy meggyőződjünk válaszunk helyességéről.
       
       program valtozo;
       var x:integer;
       begin
        x:=12;
        write(x,'-');
        x:=3;    
        write(x,'=');
        writeln(12-x);
        write(x+6,'+',x,'=');
        x:=4*x;
        writeln(x);
       end.

       
    Írjunk egy rövidebb (egyszerűbb) programot, amely változó használata nélkül kiírja ugyanezt az üzenetet a képernyőre. A teljes programunk maximum 5 soros legyen!
       
  2. Almát szeretnénk vásárolni. Írjunk egy programot, amely billentyűzetről kérje be először azt, hogy mennyibe kerül egy kilogramm alma, majd azt hogy hány kilogramm almát szeretnénk venni. A program számolja ki, hogy ennyi almáért hány koronát fogunk fizetni.
         
    Egy kg alma ara: 12
    Hany kg almat veszel: 3
    Ennyi alma ara 36 korona. 
       
      
  3. Kérjünk be két, egy napon belüli, időpontot (először az órát, aztán a percet, végül a másodpercet). Számítsuk ki a két időpont közti különbséget másodpercekben és írassuk ki!
      
    Elso idopont - ora: 7
    Elso idopont - perc: 15
    Elso idopont - masodperc: 26
    Masodik idopont - ora: 8
    Masodik idopont - perc: 16
    Masodik idopont - masodperc: 30
    A ket idopont kozott 3664 masodperc telt el.  
      
     
  4. Írjunk programot, amely beolvas két természetes számot, majd kiírja a két szám hányadosát és maradékát az alábbi formában. A program az adatok beolvasása után hagyjon ki egy üres sort.
        
    Elso szam: 17
    Masodik szam: 3
     
    17:3=5, maradek 2
        
     
  5. A program kérjen be egy számot, majd írja ki a kis szorzótáblát erre a számra (1-től 5-ig). A program a beolvasás után hagyjon ki egy üres sort.
      
    Melyik szorzotablat irjam ki: 12
     
    1 . 12 = 12
    2 . 12 = 24
    3 . 12 = 36
    4 . 12 = 48
    5 . 12 = 60
     
     
  6. Az alábbi program begépelése nélkül próbáljuk meg meghatározni, mit fog kiírni a képernyőre. Ellenőrzésképpen a programot írjuk be a számítógépbe.
      
       program szamok;
       var k:integer;
       begin
        k:=1;
        writeln(k);
        k:=k+1;   
        write(k);
        k:=k+1;
        writeln(k);
        k:=k+1;
        write(k);
        k:=k+1;
        write(k);
        k:=k+1;
        writeln(k);
       end.

      
  7. Kérjünk be három természetes számot, ezek rendre 5, 2 és 1 koronásaink számát jelentik. Határozzuk meg, és írassuk ki a teljes összeget.
      
    5 koronasok szama: 2
    2 koronasok szama: 3
    1 koronasok szama: 1
    Ez osszesen 17 korona.
      
      
     
  8. A program kérjen be egy pénzösszeget, majd határozza meg, és írja ki, hogy hogyan fizethetjük ki a lehető legkevesebb 10, 5, 2 és 1 koronás érmével (használjuk az első fejezet tananyagában megismert mod és div műveleteket)!
       
    Kifizetendo penzosszeg: 26

    2 darab 10 koronas erme,
    1 darab 5 koronas erme,
    0 darab 2 koronas erme,
    1 darab 1 koronas erme.
      
      
     
(C) 2004-2013, PaedDr. Végh Ladislav, Komárno, Szlovákia