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
- 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.
|
|
|
|