help!
  • gtom
    #18
    program tomb;
    uses crt;
    const n=10;
    var
    t:array[1..n] of integer;
    i:integer;
    begin
    clrscr;
    randomize;
    for i:=1 to n do
    begin
    t[i]:=random(90)+9;
    write(t[i]:4);
    end;
    readln;
    end.
    ez egy egy dimenziós tömb. ez egy sor