Hledani v matici – Pascal – Fórum – Programujte.com

Dobrý den,
potřeboval bych pomoci s jednoduchým programem, ale i přes to nevím jak na něj. Program má být matice 20x20 náhodných čísel z intervalu 1-40, které program sám vypíše. Uživatel má jenom napsat číslo a program má najít kolikrát v matici je, když napíše 0. V tomto programu je i, že se matice vypisuje, to ale není potřeba.
Děkuji

http://megaupload.vsevjednom.cz/images/program.jpg

Nazačiatok by som doporučoval najskôr naplniť tú maticu a až potom sa pýtať na to číslo. Ďalej namiesto read(a) používaj radšej readln(a), má to pár nežiaducich účinkov niekedy :) a teraz k tomu prečo ti to nevie povedať koľko tam toho máš. Napísal si to dobre (if[x,i]:=a then soucet:=soucet+1) ale asi si to zabudol dať do cyklu , takže si ho tam doplň a pôjde to.

já nevím, jak to mám dát do cyklu..poradíš mi?

Však naplniť si to vedel.

Tak tu to máš

for i:=1 to 20 do

	for j:=1 to 20 do

		if x[i,j]=a then inc(soucet);

Děkuju moc za pomoc, program už jsem rozběhl. Pokud by si někdo prohlížel fórum a chtěl pomoci, tak tady je program vytvořen:

http://megaupload.cz/images/hotovy-program.jpg

Jeste jednou dekuji, moc jste mi pomohli!