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

P: Kiválogatás


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




A program másolja az "a" tömb 5-nél kisebb elemeit a "b" tömbbe!



program Kereses;
var
    a : array [1..5] of integer = (8, 3, 2, 6, 1);
    b : array [1..5] of integer;
    i, j, n : integer;
begin
    j := ;
    n := ;
    for i := 1 to n do
       if a[] < 5 then
       begin
          b[j] := a[i];
          j := + 1;
       end;
    for i := 1 to -1 do
       WriteLn(b[i], ' ');
    ReadLn();
end.




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