Programozás

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!

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.

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.

Í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

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

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.

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.

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.