logó ISKOLAI TEHETSÉGGONDOZÁS
Tesztek, feladatok, hírek, információk
visszaVISSZA   
menüMENÜ   
ismétISMÉT   

P: Eldöntés


Egészítse ki a feladatnak megfelelően a programot!




A program jelenítse meg a képernyőn a "Van" szöveget, ha a kettes szám szerepel a "tomb" tömbben!
Ha nincs, akkor írassa ki, hogy "Nincs"!




program Eldontes;
var
    tomb : array [ 1..5] of integer = (9,4,5,3,2);
    i, meret, van, keresett : integer;


begin
    meret := 5;
    van := 0;


    i := 1 meret
       if tomb[i] = 2 then van := 1;


    van = 1 WriteLn('Van') WriteLn('Nincs');
end.




Ahogy a legtöbb honlap, ez a webhely is használ sütiket a weboldalain.