Wątek przeniesiony 2015-01-14 21:48 z Delphi i Pascal przez furious programming.

Program generujący macierz NxN nie działa prawidłowo

2015-01-14 21:01
0

Witam chcę napisać program, który generuje macierz o rozmiarze NxN. Do tej pory skleciłem coś takiego ale po podaniu liczby n wyskakuje mi tylko jeden wiersz tak jakby była to tablica jednowymiarowa.

program asd;
var
t:array of array of Integer;
n, i, j : integer;
begin
writeln('Podaj liczbę n');
readln(n);
SetLength(t, n, n);
for i:=1 to n do
begin
for j:=1 to n do
begin
t[i,j] := random(100);
write(t[i,j], ' ');
end;
writeln;
readln;
end;
  end.

dodanie znacznika <code class="delphi"> - @furious programming

edytowany 1x, ostatnio: furious programming, 2015-01-14 21:46
Jeśli nie chcesz, aby Twoje wątki lądowały w koszu, to naucz się po pierwsze sensownie tytułować wątki (Jak tytułować wątki na forum?), a po drugie formatować kod i wstawiać go w znaczniki kolorujące składnię (Formatowanie treści postów na forum); - furious programming 2015-01-14 21:47
Poza tym wątki dotyczące podstaw zakładamy w dziale Newbie - furious programming 2015-01-14 21:48

Pozostało 580 znaków

2015-01-14 21:06
0

Wstaw sformatowany kod (nie umiesz sam to używaj http://olesio.eu/jcf) w odpowiednie znaczniki, wtedy może ktoś na to spojrzy.


Pozostało 580 znaków

2015-01-14 21:07
  1. Zapoznaj się z pojęciem formatowania
  2. Zapoznaj się z poprawną indeksacją tablic
  3. program asd;
    var t:array of array of Integer;
    var n,y,x: integer;
    begin
    Randomize;
    WriteLn('Podaj liczbę n');
    ReadLn(n);
    SetLength(t,n,n);
    for y:=0 to n-1 do
    begin
    for x:=0 to n-1 do
    begin
      t[y,x]:=random(100);
      Write(t[y,x]:3);
    end;
    WriteLn;
    end;
    ReadLn;
    end.

    http://ideone.com/lM5mEh


Wykonuję programy na zamówienie, pisać na Priv.
Asm/C/C++/Pascal/Delphi/Java/C#/PHP/JS oraz inne języki.

Pozostało 580 znaków

Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0