NOVINKA: Kurz kybernetické bezpečnosti s akreditací MŠMT, nyní již od 0 Kč. Staň se žádaným profesionálem. Zjisti více:
Avatar
Daniel Novák
Člen
Avatar
Daniel Novák:2.11.2017 21:05

Ahoj, jsem fakt začátečník a chtěl bych poradit. Když mám dvourozměrné pole o 12x12 a chci vypsat např. číslo 2 jen do horního prvního řádku. Nebo spodní řádek. Vůbec nevím jak to zapsat. Asi je to primitivní, ale opravdu začínám.

 
Odpovědět
2.11.2017 21:05
Avatar
DarkCoder
Člen
Avatar
Odpovídá na Daniel Novák
DarkCoder:2.11.2017 21:58

Vyřešíš to za pomoci cyklu for, ve kterém máš příkaz přiřazení. U řádkového indexu 2D pole udržuješ hodnotu daného řádku a ve sloupcového indexu 2D pole máš řídící proměnnou cyklu for.

Nahoru Odpovědět
2.11.2017 21:58
"I ta nejlepší poučka postrádá na významu, není-li patřičně předána." - DarkCoder
Avatar
Michal Haňáček
Tvůrce
Avatar
Odpovídá na Daniel Novák
Michal Haňáček:3.11.2017 14:47

Obecně se u pole k buňkám přistupuje pomocí indexů.
Příklad plnění konkrétní pozice:

TvojeDvourozmernePole[IndexX, IndexY] := Hodnota;

Čtení z pozice:

Hodnota := TvojeDvourozmernePole[IndexX, IndexY];
Nahoru Odpovědět
3.11.2017 14:47
Každé rozhodnutí a každý krok v životě nás někam posune. Bohužel jen některé nás posouvají dopředu.
Avatar
Pavel Šesták
Člen
Avatar
Pavel Šesták:29.9.2019 21:30

Ahoj,
pole deklaruješ pomocí:
/*Identifikátor: klíčové slovo array, v hranatých závorkách x,y. dala by se přidat i třetí, čtvrtá až n-tá dimenze. následuje of a datový typ */
var
Moje2Dpole: array[1..5,1..5] of integer;
i,j: integer;

a procházíš pole pomocí dvou vnořených cyklů:

/*cislo 5 muze byt nahrazeno promenou a vstup urcen uzivatelem, je jen potřeba nastavit při deklaraci dost velké intervaly. */
for i := 1 to 5 do
for j := 1 to 5 do
begin
//lze zase nastavit dle požadavků
Moje2Dpole[i,j] := 1;

//popřípadě výpis
write(Moje2Dpo­le[i][j]);
end;

Omlouvám se za možnou chybu v kódu, pascal jsem dlouho neviděl ale snad jako demonstrace poslouží.

Editováno
 
Nahoru Odpovědět
29.9.2019 21:30
Avatar
Michal Haňáček
Tvůrce
Avatar
Odpovídá na Pavel Šesták
Michal Haňáček:30.9.2019 6:50

Rozhodně posloužila, zejména ve dva roky mrtvém vlákně 8-) .

Nahoru Odpovědět
30.9.2019 6:50
Každé rozhodnutí a každý krok v životě nás někam posune. Bohužel jen některé nás posouvají dopředu.
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 5 zpráv z 5.